Garbo/Garbo.cdr/mac/hypercrd/hc2_x/expert25.sit/HyperExpert 2.5/cards.xml

Text File | 1991-05-13 | 454KB | 4,679 lines

card_2066.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<card>
    <id>2066</id>
    <filler1>0</filler1>
    <bitmap>BMAP_2533.pbm</bitmap>
    <cantDelete> <false /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <owner>2738</owner>
    <link rel="stylesheet" type="text/css" href="stylesheet_4443.css" />
    <part>
        <id>1</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>74</left>
            <top>54</top>
            <right>200</right>
            <bottom>79</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Set Font Types</name>
        <script>on mouseUpput card fld font into xput card field fonttypes into thefontDoList 999,thefont,oneput item 2 of the result into card fld fontif card fld font is empty thenput x into card fld fontend ifend mouseUp</script>
    </part>
    <part>
        <id>2</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>74</left>
            <top>244</top>
            <right>200</right>
            <bottom>269</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Set Button Types</name>
        <script>on mousedownput card fld buttontypes into zput the mouseloc into myPlaceput item 1 of myPlace - 20 into horizput item 2 of myPlace - 10 into vertget PopUpMenu( z, 1, vert, horiz)put it into xput item x of card fld buttontypes into card fld buttonif cd fld button is empty thenanswer "Try again, this is a pop up menu"put item 4 of card fld "buttontypes" into card fld buttonend ifend mousedown</script>
    </part>
    <part>
        <id>3</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>88</left>
            <top>248</top>
            <right>332</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>buttontypes</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <part>
        <id>4</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>98</left>
            <top>275</top>
            <right>396</right>
            <bottom>342</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>fonttypes</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <part>
        <id>5</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>231</left>
            <top>52</top>
            <right>370</right>
            <bottom>81</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>14</textSize>
        <textStyle>bold</textStyle>
        <textHeight>18</textHeight>
        <name>font</name>
        <script>on mouseUpanswer "This is not a button"end mouseUp</script>
    </part>
    <part>
        <id>9</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>232</left>
            <top>242</top>
            <right>371</right>
            <bottom>271</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>14</textSize>
        <textStyle>bold</textStyle>
        <textHeight>18</textHeight>
        <name>button</name>
        <script>on mouseUpanswer "This is not a button"end mouseUp</script>
    </part>
    <part>
        <id>10</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>0</left>
            <top>288</top>
            <right>66</right>
            <bottom>342</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>29114</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>return</name>
        <script>on mouseUpgo to card buildanswer "Click on Build Expert System to begin"end mouseUp</script>
    </part>
    <part>
        <id>11</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>74</left>
            <top>99</top>
            <right>200</right>
            <bottom>124</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Set Font Size</name>
        <script>on mousedownput card fld fontsize into ppput the mouseloc into myPlaceput item 1 of myPlace - 20 into horizput item 2 of myPlace - 10 into vertget PopUpMenu(pp, 1, vert, horiz)put it into xput item x of card fld fontsize into card fld sizeif cd fld size is empty thenanswer "Try again, this is a pop up menu"put item 5 of card fld "fontsize" into card fld sizeend ifend mousedown</script>
    </part>
    <part>
        <id>13</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>231</left>
            <top>97</top>
            <right>370</right>
            <bottom>126</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>14</textSize>
        <textStyle>bold</textStyle>
        <textHeight>18</textHeight>
        <name>size</name>
        <script>on mouseUpanswer "This is not a button"end mouseUp</script>
    </part>
    <part>
        <id>14</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>279</left>
            <top>1</top>
            <right>479</right>
            <bottom>86</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>fontsize</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <part>
        <id>16</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>74</left>
            <top>196</top>
            <right>204</right>
            <bottom>221</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Set Answer Types</name>
        <script>on mousedownput card fld answertype into ppput the mouseloc into myPlaceput item 1 of myPlace - 20 into horizput item 2 of myPlace - 10 into vertget PopUpMenu(pp, 1, vert, horiz)put it into xput item x of card fld answertype into card fld answersif cd fld answers is empty thenanswer "Try again, this is a pop up menu"put item 1 of card fld "answertype" into card fld answersend ifend mousedown</script>
    </part>
    <part>
        <id>17</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>232</left>
            <top>193</top>
            <right>371</right>
            <bottom>222</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>14</textSize>
        <textStyle>bold</textStyle>
        <textHeight>18</textHeight>
        <name>answers</name>
        <script>on mouseUpanswer "This is not a button"end mouseUp</script>
    </part>
    <part>
        <id>18</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>11</left>
            <top>0</top>
            <right>275</right>
            <bottom>28</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>answertype</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <part>
        <id>19</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>452</left>
            <top>293</top>
            <right>512</right>
            <bottom>342</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>29114</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>To Tree</name>
        <script>on mouseUpgo to card fullend mouseUp</script>
    </part>
    <part>
        <id>21</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>74</left>
            <top>147</top>
            <right>204</right>
            <bottom>172</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Set Text Align</name>
        <script>on mousedownput card fld aligntype into ppput the mouseloc into myPlaceput item 1 of myPlace - 20 into horizput item 2 of myPlace - 10 into vertget PopUpMenu(pp, 1, vert, horiz)put it into xput item x of card fld aligntype into card fld alignif cd fld align is empty thenanswer "Try again, this is a pop up menu"put item 1 of card fld "aligntype" into card fld alignend ifend mousedown</script>
    </part>
    <part>
        <id>22</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>231</left>
            <top>145</top>
            <right>370</right>
            <bottom>174</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>14</textSize>
        <textStyle>bold</textStyle>
        <textHeight>18</textHeight>
        <name>align</name>
        <script>on mouseUpanswer "This is not a button"end mouseUp</script>
    </part>
    <part>
        <id>23</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>164</left>
            <top>279</top>
            <right>304</right>
            <bottom>336</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>aligntype</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <content>
        <layer>card</layer>
        <id>3</id>
        <text>Transparent,Opaque,Rectangle,Shadow,roundRect,checkbox,radioButton</text>
    </content>
    <content>
        <layer>card</layer>
        <id>14</id>
        <text>9,10,12,14,18,24,32,48</text>
    </content>
    <content>
        <layer>card</layer>
        <id>18</id>
        <text>True-False,Yes-No,A-B,Variable</text>
    </content>
    <content>
        <layer>card</layer>
        <id>23</id>
        <text>Left,Center,Right</text>
    </content>
    <content>
        <layer>card</layer>
        <id>4</id>
        <text>Albuquerque,Astrology,Athens,Avant Garde,Beverly Hills,Black Knight,Boston,BostonII,BostonIIΓÇôNY,Cairo,Calligraphy,Cape Canaveral,Caps,Cartoon,Cavanaugh,Chicago,Cologne,Commando,Courier,Crypt,Cupertino,Dallas,Detroit,Doodads,Florence,Geneva,Gimcracks,Gloss,Helsinki,Helvetica,Hollywood,Infocom,Kawasaki*,London,Long Island,Los Angeles,Manhattan,Memphis,MicroAvantGarde,MicroBoston,MicroCourier,MiniBoston,Mobile,Monaco,New York,NY Nights,OCR-A,Palatino,Paris,Pierce,Raster,San Francisco,Seattle,Silicon Beach,Sydney,Symbol,Teeny,ThinAvantGarde,ThinCourier,Thingamajigs,ThinHelvetica,ThinSchoolbook,Times,Tiny,Tiny Ital,Tinytown,Tombstone,Venice,White Shadow,Zapf Chancery,Zapf Dingbats,Zurich</text>
    </content>
    <content>
        <layer>card</layer>
        <id>17</id>
        <text>Yes-No</text>
    </content>
    <content>
        <layer>card</layer>
        <id>5</id>
        <text>Boston</text>
    </content>
    <content>
        <layer>card</layer>
        <id>9</id>
        <text>Shadow</text>
    </content>
    <content>
        <layer>card</layer>
        <id>22</id>
        <text>Center</text>
    </content>
    <content>
        <layer>card</layer>
        <id>13</id>
        <text>18</text>
    </content>
    <name>default</name>
    <script>on closeCardglobal buttontype, sizetype, answertype, fonttype, aligntypeset lockscreen to truehide card fld fonttypesput card fld button into buttontypeput card fld size into sizetypeput card fld font into fonttypeput card fld answers into answertypeput card fld align into aligntypeshow card button "return"end closeCard</script>
</card>


card_2988.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<card>
    <id>2988</id>
    <filler1>0</filler1>
    <bitmap>BMAP_3775.pbm</bitmap>
    <cantDelete> <true /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <owner>2738</owner>
    <link rel="stylesheet" type="text/css" href="stylesheet_4443.css" />
    <part>
        <id>1</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>101</left>
            <top>76</top>
            <right>428</right>
            <bottom>156</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Build Expert System</name>
        <script>on mouseUpglobal ques, cdname, buttontype, sizetype, fonttype, answertype,¬aligntypeput script of card fld "definition" into zigset lockscreen to truego to card fullif cd fld "problem" is empty thenanswer "You must define the problem to work on" with "OK"domenu "new card"domenu "new field"set the name of cd fld "" to "define"set the style of cd fld "define" to scrollingchoose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zigchoose browse toolanswer "Define you problem in the following field" with "OK"answer "Click finished when done"click at 246,131exit mouseUpend ifgo to card defaultanswer "Are you happy with the default settings" with "No" or "YES"if it is "No" thenanswer "Then change them" with "OK"hide card button "To Tree"exit mouseUpend ifgo to card buildset the loc of the msg box to 30,217put "WORKING..." into msg boxput the script of card fld "finished" into pgo to card defaultput the long name of this stack into tempput Resources("FONT",temp) into rssput card fld button into buttontypeput card fld size into sizetypeput card fld font into fonttypeput card fld answers into answertypego to card "full"put the short name of this card into cdnamego to last carddomenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolput 1 into quesput ques into card fld ques1 of card fullset the name of this card to "ques1"domenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinghide msg boxanswer "Type your question in the following field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131hide msg boxend mouseUp</script>
    </part>
    <part>
        <id>2</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>6</left>
            <top>330</top>
            <right>18</right>
            <bottom>342</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>finished</name>
        <script>on mouseUpglobal x, ques, ans, qc, fdl, inum,¬cdname, buttontype, fonttype, sizetype, answertype, aligntypeput cd fld "funny" into xif x is empty thenanswer "You havent typed a question!" with "OK"exit mouseUpend ifput id of this card into inumset lockscreen to trueset the loc of msg box to 23,208put "WORKING..." into msg boxgo to card "full"put 1 into card fld "cd count"put 1 into card fld "ans count"put 0 into card fld "con count"put 0 into card fld dqcountput 0 into card fld dccountput "Question" into card fld "label1"domenu "new field"set the name of card fld "" to inumput x into card fld inumset the lockText of card fld inum to trueset the style of card fld inum to scrollingset the lockText of card fld inum to trueset the script of card fld inum to "on mouseUp"¬&return&"hide me"&return&"end mouseUp"hide card fld inumdomenu "new button"set the rect of card btn "new button" to 4,122,68,164set the loc of card btn "new button" to 36,143set the rect of card btn "new button" to 4,122,68,164set the showName of cd btn "new button" to falseset the style of cd btn "new button" to transparentset the script of card btn "new button" to "on mouseUp"¬&return&"show card fld "&quote&inum&quote¬&return&"end mouseUp"set the name of card btn "new button" to inumdomenu "back"set lockscreen to falsehide msg boxif aligntype is empty thenask "What type of alignment do you want?" with "Center"put it into alelseput aligntype into alend ifif fonttype is empty thenask "What type of font do you want?" with "Helvetica"put it into ftelseput fonttype into ftend ifif sizetype is empty thenask "What size font do you want?" with "24"put it into werelseput sizetype into werend ifdomenu "new field"set the name of card fld "" to "ha"set the style of card fld "ha" to scrollingset the rect of card fld "ha" to 6,61,507,200set the textFont of card fld "ha" to ftset the textSize of card fld "ha" to werset the textAlign of card fld "ha" to alhide card fld "funny"put card fld "funny" into card fld "ha"if buttontype is empty thenask "What type of button do you want?" with "shadow"put it into btntypelseput buttontype into btntypend ifchoose button toolput 2 into funrepeat 2 timesdomenu "new button"set the style of card button fun to btntypadd 1 to funend repeatif answertype = "Variable" or answertype is empty thenask "What is answer number 1" with "6 letters max/Yes or No"put it into xx1put the number of characters of xx1 into zipif zip > 6 thenbeep 1repeat until zip ≤ 6beep 1ask "What is answer number 1" with "6 letters max/Yes or No"put it into xx1put the number of characters of xx1 into zipend repeatend ifset the name of card button "new button" to xx1ask "What is answer number 2" with "6 letters max/Yes or No"put it into yy1put the number of characters of yy1 into zipif zip > 6 thenbeep 1repeat until zip ≤ 6beep 1ask "What is answer number 2" with "6 letters max/Yes or No"put it into yy1put the number of characters of yy1 into zipend repeatend ifset the name of card button "new button" to yy1end ifif answertype = "True-False" thenset the name of card button "new button" to "True"set the name of card button "new button" to "False"put "True" into xx1put "False" into yy1end ifif answertype = "A-B" thenset the name of card button "new button" to "A"set the name of card button "new button" to "B"put "A" into xx1put "B" into yy1end ifif answertype = "Yes-No" thenset the name of card button "new button" to "Yes"set the name of card button "new button" to "No"put "Yes" into xx1put "No" into yy1end ifset the loc of card button 2 to 176,253set the loc of card button 3 to 337,253wait 100answer "Does that look alright" with "No" or "Yes"if it is "No" thentonesend ifgo to card cdnameput xx1 into card fld "yes1"put yy1 into card fld "no1"choose browse toolhide meanswer "Click on a answer field to continue (i.e Y-N)"end mouseUpon tonesglobal x, aligntype, buttontype, answertype, fonttype, sizetypeput empty into card fld "ha"select card button 2domenu "clear button"select card button 2domenu "clear button"choose select toolput card fld fonttypes of card default into ftput card fld fontsize of card default into stput card fld buttontypes of card default into btanswer "Choose type of font do you want?" with "OK"DoList 999,ft,oneif the result is empty thenput "Geneva" into ftelseput item 2 of the result into ftend ifanswer "Choose size of font do you want?" with "OK"DoList 999,st,oneif item 2 of the result is empty thenput 24 into stelseput item 2 of the result into stend ifset the textFont of card fld "ha" to ftset the textSize of card fld "ha" to stanswer "Align the field: Left, Right, Center" with¬"Left" or "Right" or "Center"if it is "Left" thenset textAlign of card fld "ha" to leftend ifif it is "Right" thenset textAlign of card fld "ha" to rightend ifif it is "Center" thenset textAlign of card fld "ha" to centerend ifanswer "Choose type of button do you want?" with "OK"DoList 999,bt,oneif item 2 of the result is empty thenput "Shadow" into btelseput item 2 of the result into btend ifchoose button toolput 2 into funrepeat 2 timesdomenu "new button"set the style of card button fun to btadd 1 to funend repeatset the loc of card button 2 to 176,253set the loc of card button 3 to 337,253ask "What is answer number 1" with answertypeput it into xx1put the number of characters of xx1 into zipif zip > 6 thenbeep 1repeat until zip ≤ 6beep 1ask "What is answer number 1" with "6 letters max"put it into xx1put the number of characters of xx1 into zipend repeatend ifset the name of card button "new button" to xx1ask "What is answer number 2" with answertypeput it into yy1put the number of characters of yy1 into zipif zip > 6 thenbeep 1repeat until zip ≤ 6beep 1ask "What is answer number 2" with "6 letters max"put it into yy1put the number of characters of yy1 into zipend repeatend ifset the name of card button "new button" to yy1put card fld "funny" into card fld "ha"wait 100answer "Does that look alright" with "Yes" or "No"if it is "no" thentonesend ifif xx1 = yy1 thenanswer "You cannot have two buttons with the same names" with "OK"tonesend ifend tones</script>
    </part>
    <part>
        <id>9</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>148</left>
            <top>214</top>
            <right>384</right>
            <bottom>257</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Make Default Settings</name>
        <script>on mouseUpgo to card defaulthide card btn "To Tree"end mouseUp</script>
    </part>
    <part>
        <id>11</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>33</left>
            <top>330</top>
            <right>45</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>definition</name>
        <script>on mouseUpif card fld "define" is empty thenanswer "Thats not much of a problem!"exit mouseUpend ifput cd fld "define" into troydomenu delete cardgo to card defaultset lockscreen to truego to cd "full"put troy into card fld "problem"go to card "build"get the loc of card button "Build Expert System"click at itend mouseUp</script>
    </part>
    <part>
        <id>12</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>0</left>
            <top>277</top>
            <right>75</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>14767</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>About</name>
        <script>on mouseUpshow card fld aboutset scroll of card fld about to 1end mouseUp</script>
    </part>
    <part>
        <id>14</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>424</left>
            <top>273</top>
            <right>512</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>1020</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Help</name>
        <script>on mouseUpshow card fld helpset the scroll of card fld help to 1end mouseUp</script>
    </part>
    <part>
        <id>16</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>240</left>
            <top>323</top>
            <right>286</right>
            <bottom>342</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Quit</name>
        <script>on mouseUpgo homeend mouseUp</script>
    </part>
    <part>
        <id>13</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>0</left>
            <top>0</top>
            <right>512</right>
            <bottom>342</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>about</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <part>
        <id>15</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>0</left>
            <top>0</top>
            <right>512</right>
            <bottom>342</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>help</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <content>
        <layer>card</layer>
        <id>13</id>
        <text>     This stack is designed to be a pseudo expert system shell** . This stack enables the expert to set up a "binomial decision tree" and work through questions on the way to a conclusion about a particular problem which end users may have. Primarily this stack serves as an overview of the decision tree. Each question the expert askes corresponds to each branch of the tree or each card in the solution stack. The stack that the expert has created, the solution stack, is then added to a ExpertMenu Stack, which this stack creates. The created problem or solution stacks, and the ExpertMenu Stack, are then given to the end users, or the people trying to solve a particular problem. The expert keeps this stack, which is a shell, for solving other problems.            For more info and a quick way to get started, click on the help button.Please distribute this stack to as many experts as you can possibly find, or all this work will have been for nothing!!!!© Copyright 1990 Troy KelleyDeveloped at the Human Factors Engineering LaboratoryAberdeen Proving Ground, Aberdeen Md 21005-5001send problems to: [e-mail]301-278-5817Developed with the aid of the Developer Stack.To receive the latest version of the Developer Stack, send $10.00 to:AnalytX Box 388Southampton, PA  18966**It is not an expert system in the true sense of the term, since it does not do any heuristic reasoning, that was not it's intent. It was intended to be very easy to use and enable an expert to create something on his own, without the aid of computer programmers, and without spending an enormous amount of time. Also, heuristic reasoning can occasionally come to a wrong conclusion, whereas with this stack, the expert knows all of the conclusions to all of the questions, so there are no wrong conclusions.</text>
    </content>
    <content>
        <layer>card</layer>
        <id>15</id>
        <text>HyperExpert Help - click on field to close it***Load this stack onto your Hard disk, or it will run very slow and may not work properly. Use HyperCard and not SuperCard. I have experienced some problems with this stack while using SuperCard.******Choose the "About Box" on this card to see the goals and purpose of this stack***----------------------------------------------------------------------------------For those of you who can't wait to get started.--------------     Step 1 - First click on the button "Build Expert System"     Step 2 - It will ask you to define the problem to be worked on. This is the                     problem that the end users are having. For Example - My car won't                                       start. Common questions or problems which get asked frequently                   is one way to think of it.     Step 3 - Set Defaults. The HyperExpert Stack is designed to make setting                    up your system as quick and easy as possible. The defaults are                    so you can set your cards how you want them to look one time,                    and then you wont have to do it again. Like all Yes-No questions.     Step 4 - After setting defaults you will have to click on the "Build Expert                       System" button again to get started.      Step 5 - Now you start your questioning to come to a conclusion about                     the problem. For example, if your problem is "My car wont start"                            then a good first question would be "Did you check the gas tank".                    You enter it in the proper field and click finished when done.      Step 6 - Now your at the tree portion of the stack. IF YOU CLICK ON THE                     QUESTION 1 BOX YOU CAN SEE THE QUESTION YOU JUST TYPED. You                    can also see the answers you have assigned for Question 1                    (i.e Yes, No). Now click on the answer to the question you                   would like to work with next. For example - your question was                    "Did you check the gas tank" and if they                     answer "No" you want to reach a conclusion at that point.                    So click on the "No" answer box next to the box labeled                     Question 1.      Step 7 - After clicking on the "No" box of Question 1 HyperExpert will ask                    if you want a question or a conclusion. If you choose                     conclusion, HyperExpert will ask you if you want the conclusion                    to go to another question. For example you might have another                     question you might want to ask even though you have reached                     one conclusion already. Simply enter the question number here.      Step 8 - Now type your conclusion, like "You should check your gas tank"                     click finished when done.      Step 9 - Now if your satisfied with all of your questions and conclusions                    click "Save System" and HyperExpert will begin to look for                     the stack "ExpertMenu". If this is the first time you have used                     HyperExpert it will not find the stack and will ask you to make a                     new one. When the new stack window comes up click on the save                    button and don't change the name of the stack. You also need to                     name your question stacks. You may call these whatever you like.                    These are the stacks that the ExpertMenu Stack references.      Step 10 - Your finished. Now give the ExpertMenu stack                     and the question stacks you created to the people who need your                    expertise. This may have sounded like a lot of steps but                    after using this stack once or twice it becomes very intuitive.                    Remember you can make the system as big as the memory and                    disk space of your own Mac will allow.                    You keep the HyperExpert Shell Stack for creating other systems.                        **A word of advise, make sure all of your questions eventually                        end with a conclusion, or your users may end up going down                        a path to no conclusion.                    **Note there is an edit button included on the ExpertMenu Stack.                        This allows anyone to remove the files you have created. You                        may want to remove this button, but it is up to you. It is                         primarily for your use.                                              **Button Functions****Build Expert System**Obviously is the first button you click on to get the process of building your system started.**Clear Tree**This button clears out the tree and the question cards that you have created. It is to be used if you have already saved the system or made some type of error that made it necessary to get rid of the entire system.**Default Settings**This button takes you to the area where you can decide what type of default settings you would like to have for your individual question cards**Edit**This button allows you to edit a question after you have created it. If the question is in the middle of the tree (i.e. there are other questions after it), then a replacement question must be created. If the question is at the end of the tree and there are no other questions after it, then it can be delete without having to replace the question.     There is an edit button on the ExpertMenu stack. It will delete the solution stack of your choice. You may decide to remove this button before you give it to your end users. It's up to you.**Set Answer Types**This is a popup menu which gives you a choice of answer types to set as a default. For example -- Yes-No, True-False. After setting this default all of your answer types will be of this kind. Notice there is a Variable answer type for answers which don't fit into one of the given categories.**Set Button Types**This is a popup menu which gives you the standard Hypercard choices for button types.**Set Font Size** This is a popup menu which sets the font size of the field containing your answer or question.**Set Font Types**This is a list menu generated by the Dolist XCMD.  It loads all the fonts you have available in your system and gives you the choice of which font you want to use for the field your question or conclusion is contained. **Set Text Align**This is a popup menu which allows you to choose a type of alignment (left, right, center) for the field which contains your question or conclusion.**Save System**This button saves your questions and conclusions to a separate stack. It will prompt you to name your stack and if you have not created an ExpertMenu stack you will be prompted to do that as well.                                           **Field Information****Deleted Conclusions**This field shows the conclusion numbers you have deleted. HyperExpert re-uses these numbers until the field contains a zero and then it starts numbering from the last conclusion.**Deleted Questions**This field shows the question numbers you have deleted. HyperExpert re-uses these numbers until the field contains a zero and then it starts numbering from the last question.**Name of Problem**Obviously this is the name of the problem you defined in the beginning.**Total Cards**This is the total number of TREE cards. For instance if you fill up the tree card will all seven questions then add an eighth question, you would then be starting another tree card, so at that point you would have 2 tree cards or 2 total cards.**Total Questions**This is the total number of questions not counting conclusions.**Total Conclusions**This is the total number of conclusions not counting questions.</text>
    </content>
    <name>build</name>
    <script></script>
</card>


card_3962.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<card>
    <id>3962</id>
    <filler1>0</filler1>
    <bitmap>BMAP_4333.pbm</bitmap>
    <cantDelete> <false /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <owner>2738</owner>
    <link rel="stylesheet" type="text/css" href="stylesheet_4443.css" />
    <part>
        <id>1</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>57</left>
            <top>98</top>
            <right>117</right>
            <bottom>111</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>yes1</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "yes1" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "ques2" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "Cancel" thenexit mouseUpend ifput the short name of this card into cdnameif it is "OK" thenanswer "Is this 1.Conclusion  2.Question?" with "1" or "2"if it is "2" thenput "Question" into card fld label2if cd fld "dqcount" ≠ 0 thenput item 1 of card fld dqcount into qcif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end ifput the script of card fld "finished" into pput qc into card fld ques2add 1 to card fld "ans count"elseput card fld "ans count" into qcput the script of card fld "finished" into padd 1 to qcput qc into card fld "ans count"put qc into card fld ques2end ifput card fld ques2 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques1 into qcgo to card "ques"&qcadd 1 to qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131elseanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifput "Conclusion" into card fld label2if card fld dccount ≠ 0 thenput item 1 of card fld dccount into qcif the number of items in cd fld dccount = 1 thenput 0 into card fld dccountelsedelete item 1 of cd fld dccountend ifput the script of card fld "conclusion" into zzput qc into card fld ques2add 1 to cd fld "con count"elseput card fld "con count" into qcput the script of card fld "conclusion" into zzadd 1 to qcput qc into card fld "con count"put qc into card fld ques2end ifput card fld ques2 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques1 into qcgo to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>2</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>57</left>
            <top>174</top>
            <right>117</right>
            <bottom>186</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>no1</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "no1" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "ques3" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "Cancel" thenexit mouseUpend ifput the short name of this card into cdnameif it is "OK" thenanswer "Is this  1.Conclusion   2.Question?" with "1" or "2"if it is "2" thenput "Question" into card fld label3if cd fld "dqcount" ≠ 0 thenput item 1 of card fld dqcount into qcif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end ifput the script of card fld "finished" into pput qc into card fld ques3add 1 to card fld "ans count"elseput card fld "ans count" into qcput the script of card fld "finished" into padd 1 to qcput qc into card fld "ans count"put qc into card fld ques3end ifput card fld ques3 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques1 into qcgo to card "ques"&qcadd 1 to qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"go to last carddomenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131elseanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifput "Conclusion" into card fld label3if card fld dccount ≠ 0 thenput item 1 of card fld dccount into qcif the number of items in cd fld dccount = 1 thenput 0 into card fld dccountelsedelete item 1 of cd fld dccountend ifput the script of card fld "conclusion" into zzput qc into card fld ques3add 1 to cd fld "con count"elseput card fld "con count" into qcput the script of card fld "conclusion" into zzadd 1 to qcput qc into card fld "con count"put qc into card fld ques3end ifput card fld ques3 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques1 into qcgo to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>3</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>157</left>
            <top>31</top>
            <right>214</right>
            <bottom>43</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>yes3</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "yes3" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "ques7" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "Cancel" thenexit mouseUpend ifput the short name of this card into cdnameif it is "OK" thenanswer "Is this 1.Conclusion  2.Question?" with "1" or "2"if it is "2" thenput "Question" into card fld label7if cd fld "dqcount" ≠ 0 thenput item 1 of card fld dqcount into qcif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end ifput the script of card fld "finished" into pput qc into card fld ques7add 1 to card fld "ans count"elseput card fld "ans count" into qcput the script of card fld "finished" into padd 1 to qcput qc into card fld "ans count"put qc into card fld ques7end ifput card fld ques7 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques2 into qcgo to card "ques"&qcadd 1 to qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131elseanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifput "Conclusion" into card fld label7if card fld dccount ≠ 0 thenput item 1 of card fld dccount into qcif the number of items in cd fld dccount = 1 thenput 0 into card fld dccountelsedelete item 1 of cd fld dccountend ifput the script of card fld "conclusion" into zzput qc into card fld ques7add 1 to cd fld "con count"elseput card fld "con count" into qcput the script of card fld "conclusion" into zzadd 1 to qcput qc into card fld "con count"put qc into card fld ques7end ifput card fld ques7 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques2 into qcgo to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>4</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>157</left>
            <top>87</top>
            <right>216</right>
            <bottom>99</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>no3</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "no3" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "ques6" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "Cancel" thenexit mouseUpend ifput the short name of this card into cdnameif it is "OK" thenanswer "Is this 1.Conclusion  2.Question?" with "1" or "2"if it is "2" thenput "Question" into card fld label6if cd fld "dqcount" ≠ 0 thenput item 1 of card fld dqcount into qcif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end ifput the script of card fld "finished" into pput qc into card fld ques6add 1 to card fld "ans count"elseput card fld "ans count" into qcput the script of card fld "finished" into padd 1 to qcput qc into card fld "ans count"put qc into card fld ques6end ifput card fld ques6 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques2 into qcgo to card "ques"&qcadd 1 to qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131elseanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifput "Conclusion" into card fld label6if card fld dccount ≠ 0 thenput item 1 of card fld dccount into qcif the number of items in cd fld dccount = 1 thenput 0 into card fld dccountelsedelete item 1 of cd fld dccountend ifput the script of card fld "conclusion" into zzput qc into card fld ques6add 1 to cd fld "con count"elseput card fld "con count" into qcput the script of card fld "conclusion" into zzadd 1 to qcput qc into card fld "con count"put qc into card fld ques6end ifput card fld ques6 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques2 into qcgo to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>5</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>160</left>
            <top>188</top>
            <right>219</right>
            <bottom>200</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>yes2</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "yes2" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "ques5" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "Cancel" thenexit mouseUpend ifput the short name of this card into cdnameif it is "OK" thenanswer "Is this 1.Conclusion  2.Question?" with "1" or "2"if it is "2" thenput "Question" into card fld label5if cd fld "dqcount" ≠ 0 thenput item 1 of card fld dqcount into qcif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end ifput the script of card fld "finished" into pput qc into card fld ques5add 1 to card fld "ans count"elseput card fld "ans count" into qcput the script of card fld "finished" into padd 1 to qcput qc into card fld "ans count"put qc into card fld ques5end ifput card fld ques5 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques3 into qcgo to card "ques"&qcadd 1 to qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"go to last carddomenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131elseanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifput "Conclusion" into card fld label5if card fld dccount ≠ 0 thenput item 1 of card fld dccount into qcif the number of items in cd fld dccount = 1 thenput 0 into card fld dccountelsedelete item 1 of cd fld dccountend ifput the script of card fld "conclusion" into zzput qc into card fld ques5add 1 to cd fld "con count"elseput card fld "con count" into qcput the script of card fld "conclusion" into zzadd 1 to qcput qc into card fld "con count"put qc into card fld ques5end ifput card fld ques5 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques3 into qcgo to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>6</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>160</left>
            <top>244</top>
            <right>219</right>
            <bottom>256</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>no2</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "no2" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "ques4" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "Cancel" thenexit mouseUpend ifput the short name of this card into cdnameif it is "OK" thenanswer "Is this 1.Conclusion  2.Question?" with "1" or "2"if it is "2" thenput "Question" into card fld label4if cd fld "dqcount" ≠ 0 thenput item 1 of card fld dqcount into qcif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end ifput the script of card fld "finished" into pput qc into card fld ques4add 1 to card fld "ans count"elseput card fld "ans count" into qcput the script of card fld "finished" into padd 1 to qcput qc into card fld "ans count"put qc into card fld ques4end ifput card fld ques4 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques3 into qcgo to card "ques"&qcadd 1 to qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"go to last carddomenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131elseanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifput "Conclusion" into card fld label4if card fld dccount ≠ 0 thenput item 1 of card fld dccount into qcif the number of items in cd fld dccount = 1 thenput 0 into card fld dccountelsedelete item 1 of cd fld dccountend ifput the script of card fld "conclusion" into zzput qc into card fld ques4add 1 to cd fld "con count"elseput card fld "con count" into qcput the script of card fld "conclusion" into zzadd 1 to qcput qc into card fld "con count"put qc into card fld ques4end ifput card fld ques4 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques3 into qcgo to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>7</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>287</left>
            <top>4</top>
            <right>344</right>
            <bottom>16</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>yes7</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "yes7" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "yes7fld" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "CANCEL" thenexit mouseUpelseadd 1 to card fld "cd count"put the short name of me into fldlocput the short name of this card into cdnameput card fld ques7 into qcput the number of card buttons into cbanswer "Is this a 1.Conclusion 2.Question?" with "1" or "2"put it into zxxif zxx = 2 thenif cd fld "dqcount" = 0 thenput card fld "ans count" into qccadd 1 to qccput qcc into card fld "ans count"elseput item 1 of card fld dqcount into qccif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end ifput qcc into card fld "ans count"--add 1 to qccend ifend ifif zxx = 1 thenanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifif cd fld "dccount" = 0 thenput card fld "con count" into qccput card fld "con count" into qccsavedadd 1 to qccadd 1 to qccsavedelseput item 1 of card fld dccount into qccput item 1 of card fld dccount into qccsavedif the number of items in cd fld dccount = 1 thenput 0 into cd fld dccountelsedelete item 1 of cd fld dccountend ifend ifput qcc into card fld "con count"add 10000 to qccend ifput card fld "ans count" into rtput card fld "con count" into ttput card fld "cd count" into ptput card fld "dccount" into xdput card fld "dqcount" into zdput cd fld problem into pmdomenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Next Arrow"set the loc of card btn "new button" to 382,8set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card full"&qcc¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"if zxx = "2" thenset the name of card button "new button" to "butques"&qccelseset the name of card button "new button" to "butcon"&qccend ifif zxx = "2" thenput "ques"&qcc into card fld yes7fldelseput "con"&qcc into card fld yes7fldend ifgo to card fulltoodomenu "copy card"domenu "paste card"set the name of this card to "full"&qccput rt into card fld "ans count"put pt into card fld "cd count"put tt into card fld "con count"put xd into card fld "dccount"put zd into card fld "dqcount"put pm into cd fld "problem"domenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Prev Arrow"set the loc of card btn "new button" to 17,176set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card "&cdname¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"set the name of card button "new button" to "bac"&qccput the short name of this card into cdnameif zxx is "2" thenput the script of card fld "finished" into pput qcc into card fld ques1put "Question" into card fld label1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your question in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131elseput the script of card fld "conclusion" into zzput "Conclusion" into card fld "label1"put qccsaved into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your conclusion in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>8</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>287</left>
            <top>34</top>
            <right>344</right>
            <bottom>46</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>no7</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "no7" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "no7fld" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "CANCEL" thenexit mouseUpelseadd 1 to card fld "cd count"put the short name of me into fldlocput the short name of this card into cdnameput card fld ques7 into qcput the number of card buttons into cbanswer "Is this a 1.Conclusion 2.Question?" with "1" or "2"put it into zxxif zxx = 2 thenif cd fld "dqcount" = 0 thenput card fld "ans count" into qccadd 1 to qccput qcc into card fld "ans count"elseput item 1 of card fld dqcount into qccif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end if--add 1 to qccput qcc into card fld "ans count"end ifend ifif zxx = 1 thenanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifif cd fld "dccount" = 0 thenput card fld "con count" into qccput card fld "con count" into qccsavedadd 1 to qccadd 1 to qccsavedelseput item 1 of card fld dccount into qccput item 1 of card fld dccount into qccsavedif the number of items in cd fld dccount = 1 thenput 0 into cd fld dccountelsedelete item 1 of cd fld dccountend ifend ifput qcc into card fld "con count"add 10000 to qccend ifput card fld "ans count" into rtput card fld "con count" into ttput card fld "cd count" into ptput card fld "dccount" into xdput card fld "dqcount" into zdput cd fld problem into pmdomenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Next Arrow"set the loc of card btn "new button" to 382,41set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card full"&qcc¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"if zxx = "2" thenset the name of card button "new button" to "butques"&qccelseset the name of card button "new button" to "butcon"&qccend ifif zxx = "2" thenput "ques"&qcc into card fld no7fldelseput "con"&qcc into card fld no7fldend ifgo to card fulltoodomenu "copy card"domenu "paste card"set the name of this card to "full"&qccput rt into card fld "ans count"put tt into card fld "con count"put pt into card fld "cd count"put xd into card fld "dccount"put zd into card fld "dqcount"put pm into cd fld "problem"domenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Prev Arrow"set the loc of card btn "new button" to 17,176set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card "&cdname¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"set the name of card button "new button" to "bac"&qccput the short name of this card into cdnameif zxx is "2" thenput the script of card fld "finished" into pput qcc into card fld ques1put "Question" into card fld label1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your question in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131elseput the script of card fld "conclusion" into zzput "Conclusion" into card fld "label1"put qccsaved into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your conclusion in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>9</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>290</left>
            <top>93</top>
            <right>344</right>
            <bottom>105</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>yes6</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "yes6" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "yes6fld" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "CANCEL" thenexit mouseUpelseadd 1 to card fld "cd count"put the short name of me into fldlocput the short name of this card into cdnameput card fld ques6 into qcput the number of card buttons into cbanswer "Is this a 1.Conclusion 2.Question?" with "1" or "2"put it into zxxif zxx = 2 thenif cd fld "dqcount" = 0 thenput card fld "ans count" into qccadd 1 to qccput qcc into card fld "ans count"elseput item 1 of card fld dqcount into qccif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end if--add 1 to qccput qcc into card fld "ans count"end ifend ifif zxx = 1 thenanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifif cd fld "dccount" = 0 thenput card fld "con count" into qccput card fld "con count" into qccsavedadd 1 to qccadd 1 to qccsavedelseput item 1 of card fld dccount into qccput item 1 of card fld dccount into qccsavedif the number of items in cd fld dccount = 1 thenput 0 into cd fld dccountelsedelete item 1 of cd fld dccountend ifend ifput qcc into card fld "con count"add 10000 to qccend ifput card fld "ans count" into rtput card fld "con count" into ttput card fld "cd count" into ptput card fld "dccount" into xdput card fld "dqcount" into zdput cd fld problem into pmdomenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Next Arrow"set the loc of card btn "new button" to 382,98set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card full"&qcc¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"if zxx = "2" thenset the name of card button "new button" to "butques"&qccelseset the name of card button "new button" to "butcon"&qccend ifif zxx = "2" thenput "ques"&qcc into card fld yes6fldelseput "con"&qcc into card fld yes6fldend ifgo to card fulltoodomenu "copy card"domenu "paste card"set the name of this card to "full"&qccput rt into card fld "ans count"put tt into card fld "con count"put pt into card fld "cd count"put xd into card fld "dccount"put zd into card fld "dqcount"put pm into cd fld "problem"domenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Prev Arrow"set the loc of card btn "new button" to 17,176set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card "&cdname¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"set the name of card button "new button" to "bac"&qccput the short name of this card into cdnameif zxx is "2" thenput the script of card fld "finished" into pput qcc into card fld ques1put "Question" into card fld label1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your question in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131elseput the script of card fld "conclusion" into zzput "Conclusion" into card fld "label1"put qccsaved into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your conclusion in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>10</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>291</left>
            <top>123</top>
            <right>344</right>
            <bottom>135</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>no6</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "no6" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "no6fld" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "CANCEL" thenexit mouseUpelseadd 1 to card fld "cd count"put the short name of me into fldlocput the short name of this card into cdnameput card fld ques6 into qcput the number of card buttons into cbanswer "Is this a 1.Conclusion 2.Question?" with "1" or "2"put it into zxxif zxx = 2 thenif cd fld "dqcount" = 0 thenput card fld "ans count" into qccadd 1 to qccput qcc into card fld "ans count"elseput item 1 of card fld dqcount into qccif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end if--add 1 to qccput qcc into card fld "ans count"end ifend ifif zxx = 1 thenanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifif cd fld "dccount" = 0 thenput card fld "con count" into qccput card fld "con count" into qccsavedadd 1 to qccadd 1 to qccsavedelseput item 1 of card fld dccount into qccput item 1 of card fld dccount into qccsavedif the number of items in cd fld dccount = 1 thenput 0 into cd fld dccountelsedelete item 1 of cd fld dccountend ifend ifput qcc into card fld "con count"add 10000 to qccend ifput card fld "ans count" into rtput card fld "con count" into ttput card fld "cd count" into ptput card fld "dccount" into xdput card fld "dqcount" into zdput cd fld problem into pmdomenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Next Arrow"set the loc of card btn "new button" to 382,131set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card full"&qcc¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"if zxx = "2" thenset the name of card button "new button" to "butques"&qccelseset the name of card button "new button" to "butcon"&qccend ifif zxx = "2" thenput "ques"&qcc into card fld no6fldelseput "con"&qcc into card fld no6fldend ifgo to card fulltoodomenu "copy card"domenu "paste card"set the name of this card to "full"&qccput rt into card fld "ans count"put tt into card fld "con count"put pt into card fld "cd count"put xd into card fld "dccount"put zd into card fld "dqcount"put pm into cd fld "problem"domenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Prev Arrow"set the loc of card btn "new button" to 17,176set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card "&cdname¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"set the name of card button "new button" to "bac"&qccput the short name of this card into cdnameif zxx is "2" thenput the script of card fld "finished" into pput qcc into card fld ques1put "Question" into card fld label1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your question in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131elseput the script of card fld "conclusion" into zzput "Conclusion" into card fld "label1"put qccsaved into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your conclusion in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>11</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>290</left>
            <top>173</top>
            <right>346</right>
            <bottom>185</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>yes5</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "yes5" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "yes5fld" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "CANCEL" thenexit mouseUpelseadd 1 to card fld "cd count"put the short name of me into fldlocput the short name of this card into cdnameput card fld ques5 into qcput the number of card buttons into cbanswer "Is this a 1.Conclusion 2.Question?" with "1" or "2"put it into zxxif zxx = 2 thenif cd fld "dqcount" = 0 thenput card fld "ans count" into qccadd 1 to qccput qcc into card fld "ans count"elseput item 1 of card fld dqcount into qccif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end if--add 1 to qccput qcc into card fld "ans count"end ifend ifif zxx = 1 thenanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifif cd fld "dccount" = 0 thenput card fld "con count" into qccput card fld "con count" into qccsavedadd 1 to qccadd 1 to qccsavedelseput item 1 of card fld dccount into qccput item 1 of card fld dccount into qccsavedif the number of items in cd fld dccount = 1 thenput 0 into cd fld dccountelsedelete item 1 of cd fld dccountend ifend ifput qcc into card fld "con count"add 10000 to qccend ifput card fld "ans count" into rtput card fld "con count" into ttput card fld "cd count" into ptput card fld "dccount" into xdput card fld "dqcount" into zdput cd fld problem into pmdomenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Next Arrow"set the loc of card btn "new button" to 382,175set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card full"&qcc¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"if zxx = "2" thenset the name of card button "new button" to "butques"&qccelseset the name of card button "new button" to "butcon"&qccend ifsubtract 1 from cbif zxx = "2" thenput "ques"&qcc into card fld yes5fldelseput "con"&qcc into card fld yes5fldend ifgo to card fulltoodomenu "copy card"domenu "paste card"set the name of this card to "full"&qccput rt into card fld "ans count"put tt into card fld "con count"put pt into card fld "cd count"put xd into card fld "dccount"put zd into card fld "dqcount"put pm into cd fld "problem"domenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Prev Arrow"set the loc of card btn "new button" to 17,176set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card "&cdname¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"set the name of card button "new button" to "bac"&qccput the short name of this card into cdnameif zxx is "2" thenput the script of card fld "finished" into pput "Question" into card fld "label1"put qcc into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your question in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131elseput the script of card fld "conclusion" into zzput "Conclusion" into card fld "label1"put qccsaved into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your conclusion in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>12</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>290</left>
            <top>201</top>
            <right>346</right>
            <bottom>213</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>no5</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "no5" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "no5fld" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "CANCEL" thenexit mouseUpelseadd 1 to card fld "cd count"put the short name of me into fldlocput the short name of this card into cdnameput card fld ques5 into qcput the number of card buttons into cbanswer "Is this a 1.Conclusion 2.Question?" with "1" or "2"put it into zxxif zxx = 2 thenif cd fld "dqcount" = 0 thenput card fld "ans count" into qccadd 1 to qccput qcc into card fld "ans count"elseput item 1 of card fld dqcount into qccif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end if--add 1 to qccput qcc into card fld "ans count"end ifend ifif zxx = 1 thenanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifif cd fld "dccount" = 0 thenput card fld "con count" into qccput card fld "con count" into qccsavedadd 1 to qccadd 1 to qccsavedelseput item 1 of card fld dccount into qccput item 1 of card fld dccount into qccsavedif the number of items in cd fld dccount = 1 thenput 0 into cd fld dccountelsedelete item 1 of cd fld dccountend ifend ifput qcc into card fld "con count"add 10000 to qccend ifput card fld "ans count" into rtput card fld "con count" into ttput card fld "cd count" into ptput card fld "dccount" into xdput card fld "dqcount" into zdput cd fld problem into pmdomenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Next Arrow"set the loc of card btn "new button" to 382,210set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card full"&qcc¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"if zxx = "2" thenset the name of card button "new button" to "butques"&qccelseset the name of card button "new button" to "butcon"&qccend ifif zxx = "2" thenput "ques"&qcc into card fld no5fldelseput "con"&qcc into card fld no5fldend ifgo to card fulltoodomenu "copy card"domenu "paste card"set the name of this card to "full"&qccput rt into card fld "ans count"put tt into card fld "con count"put pt into card fld "cd count"put xd into card fld "dccount"put zd into card fld "dqcount"put pm into cd fld "problem"domenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Prev Arrow"set the loc of card btn "new button" to 17,176set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card "&cdname¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"set the name of card button "new button" to "bac"&qccput the short name of this card into cdnameif zxx is "2" thenput the script of card fld "finished" into pput qcc into card fld ques1put "Question" into card fld label1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your question in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131elseput the script of card fld "conclusion" into zzput "Conclusion" into card fld "label1"put qccsaved into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your conclusion in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>13</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>291</left>
            <top>260</top>
            <right>347</right>
            <bottom>272</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>yes4</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "yes4" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "yes4fld" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "CANCEL" thenexit mouseUpelseadd 1 to card fld "cd count"put the short name of me into fldlocput the short name of this card into cdnameput card fld ques4 into qcput the number of card buttons into cbanswer "Is this a 1.Conclusion 2.Question?" with "1" or "2"put it into zxxif zxx = 2 thenif cd fld "dqcount" = 0 thenput card fld "ans count" into qccadd 1 to qccput qcc into card fld "ans count"elseput item 1 of card fld dqcount into qccif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end if--add 1 to qccput qcc into card fld "ans count"end ifend ifif zxx = 1 thenanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifif cd fld "dccount" = 0 thenput card fld "con count" into qccput card fld "con count" into qccsavedadd 1 to qccadd 1 to qccsavedelseput item 1 of card fld dccount into qccput item 1 of card fld dccount into qccsavedif the number of items in cd fld dccount = 1 thenput 0 into cd fld dccountelsedelete item 1 of cd fld dccountend ifend ifput qcc into card fld "con count"add 10000 to qccend ifput card fld "ans count" into rtput card fld "con count" into ttput card fld "cd count" into ptput card fld "dccount" into xdput card fld "dqcount" into zdput cd fld problem into pmdomenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Next Arrow"set the loc of card btn "new button" to 382,266set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card full"&qcc¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"if zxx = "2" thenset the name of card button "new button" to "butques"&qccelseset the name of card button "new button" to "butcon"&qccend ifif zxx = "2" thenput "ques"&qcc into card fld yes4fldelseput "con"&qcc into card fld yes4fldend ifgo to card fulltoodomenu "copy card"domenu "paste card"set the name of this card to "full"&qccput rt into card fld "ans count"put tt into card fld "con count"put pt into card fld "cd count"put xd into card fld "dccount"put zd into card fld "dqcount"put pm into cd fld "problem"domenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Prev Arrow"set the loc of card btn "new button" to 17,176set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card "&cdname¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"set the name of card button "new button" to "bac"&qccput the short name of this card into cdnameif zxx is "2" thenput the script of card fld "finished" into pput qcc into card fld ques1put "Question" into card fld label1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your question in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131elseput the script of card fld "conclusion" into zzput "Conclusion" into card fld "label1"put qccsaved into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your conclusion in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>14</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>291</left>
            <top>291</top>
            <right>347</right>
            <bottom>303</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>no4</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "no4" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "no4fld" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "CANCEL" thenexit mouseUpelseadd 1 to card fld "cd count"put the short name of me into fldlocput the short name of this card into cdnameput card fld ques4 into qcput the number of card buttons into cbanswer "Is this a 1.Conclusion 2.Question?" with "1" or "2"put it into zxxif zxx = 2 thenif cd fld "dqcount" = 0 thenput card fld "ans count" into qccadd 1 to qccput qcc into card fld "ans count"elseput item 1 of card fld dqcount into qccif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end if--add 1 to qccput qcc into card fld "ans count"end ifend ifif zxx = 1 thenanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifif cd fld "dccount" = 0 thenput card fld "con count" into qccput card fld "con count" into qccsavedadd 1 to qccadd 1 to qccsavedelseput item 1 of card fld dccount into qccput item 1 of card fld dccount into qccsavedif the number of items in cd fld dccount = 1 thenput 0 into cd fld dccountelsedelete item 1 of cd fld dccountend ifend ifput qcc into card fld "con count"add 10000 to qccend ifput card fld "ans count" into rtput card fld "con count" into ttput card fld "cd count" into ptput card fld "dccount" into xdput card fld "dqcount" into zdput cd fld problem into pmdomenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Next Arrow"set the loc of card btn "new button" to 382,297set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card full"&qcc¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"if zxx = "2" thenset the name of card button "new button" to "butques"&qccelseset the name of card button "new button" to "butcon"&qccend ifif zxx = "2" thenput "ques"&qcc into card fld no4fldelseput "con"&qcc into card fld no4fldend ifgo to card fulltoodomenu "copy card"domenu "paste card"set the name of this card to "full"&qccput rt into card fld "ans count"put tt into card fld "con count"put pt into card fld "cd count"put xd into card fld "dccount"put zd into card fld "dqcount"put pm into cd fld "problem"domenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Prev Arrow"set the loc of card btn "new button" to 17,176set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card "&cdname¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"set the name of card button "new button" to "bac"&qccput the short name of this card into cdnameif zxx is "2" thenput the script of card fld "finished" into pput qcc into card fld ques1put "Question" into card fld label1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your question in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131elseput the script of card fld "conclusion" into zzput "Conclusion" into card fld "label1"put qccsaved into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your conclusion in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>39</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>11</left>
            <top>138</top>
            <right>61</right>
            <bottom>152</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ques1</name>
        <script></script>
    </part>
    <part>
        <id>40</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>100</left>
            <top>63</top>
            <right>149</right>
            <bottom>77</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ques2</name>
        <script></script>
    </part>
    <part>
        <id>41</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>104</left>
            <top>220</top>
            <right>153</right>
            <bottom>234</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ques3</name>
        <script></script>
    </part>
    <part>
        <id>42</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>227</left>
            <top>22</top>
            <right>276</right>
            <bottom>36</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ques7</name>
        <script></script>
    </part>
    <part>
        <id>43</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>231</left>
            <top>112</top>
            <right>280</right>
            <bottom>126</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ques6</name>
        <script></script>
    </part>
    <part>
        <id>44</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>231</left>
            <top>192</top>
            <right>280</right>
            <bottom>206</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ques5</name>
        <script></script>
    </part>
    <part>
        <id>45</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>232</left>
            <top>280</top>
            <right>281</right>
            <bottom>294</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ques4</name>
        <script></script>
    </part>
    <part>
        <id>62</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>411</left>
            <top>200</top>
            <right>512</right>
            <bottom>222</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Help</name>
        <script>on mouseUpshow card fld helpset the scroll of card fld help to 1end mouseUp</script>
    </part>
    <part>
        <id>64</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>351</left>
            <top>330</top>
            <right>363</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>finished</name>
        <script>on mouseUpglobal inum, fldloc, qc, cdname, buttontype,¬fonttype, sizetype, answertype, aligntypeput cd fld "funny" into xif x is empty thenanswer "You havent typed a question!" with "OK"exit mouseUpend ifput id of this card into inumset lockscreen to trueset the loc of msg box to 23,208put "WORKING..." into msg boxgo to card cdnamedomenu "new field"set the name of card fld "" to inumput x into card fld inumset the lockText of card fld inum to trueset the style of card fld inum to scrollingset the lockText of card fld inum to trueset the script of card fld inum to "on mouseUp"¬&return&"hide me"&return&"end mouseUp"hide card fld inumdomenu "new button"set the name of card btn "new button" to inumset the rect of card btn inum to 4,122,68,164if fldloc = "yes1" thenset the loc of card btn inum to 124,65end ifif fldloc = "no1" thenset the loc of card btn inum to 128,222end ifif fldloc = "no3" thenset the loc of card btn inum to 255,114end ifif fldloc = "yes3" thenset the loc of card btn inum to 251,25end ifif fldloc = "yes2" thenset the loc of card btn inum to 256,194end ifif fldloc = "no2" thenset the loc of card btn inum to 256,282end ifset the showName of cd btn inum to falseset the style of cd btn inum to transparentset the script of card btn inum to "on mouseUp"¬&return&"show card fld "&quote&inum&quote¬&return&"end mouseUp"domenu "back"if aligntype is empty thenask "What type of alignment do you want?" with "Center"put it into alelseput aligntype into alend ifif fonttype is empty thenask "What type of font do you want?" with "Helvetica"put it into ftelseput fonttype into ftif sizetype is empty thenask "What size font do you want?" with "24"put it into werelseput sizetype into werend ifend ifdomenu "new field"set the name of card fld "" to "ha"set the style of card fld "ha" to scrollingset the rect of card fld "ha" to 6,61,507,200set the textFont of card fld "ha" to ftset the textSize of card fld "ha" to werset the textAlign of card fld "ha" to alhide card fld "funny"put card fld "funny" into card fld "ha"if buttontype is empty thenask "What type of button do you want?" with "shadow"put it into btntypelseput buttontype into btntypend ifchoose button toolput 2 into funrepeat 2 timesdomenu "new button"set the style of card button fun to btntypadd 1 to funend repeatif answertype = "Variable" thenask "What is answer number 1" with "9 letters max/Yes or No"put it into xx1put the number of characters of xx1 into zipif zip > 9 thenbeep 1repeat until zip ≤ 9beep 1ask "What is answer number 1" with "9 letters max/Yes or No"put it into xx1put the number of characters of xx1 into zipend repeatend ifset the name of card button "new button" to xx1ask "What is answer number 2" with "9 letters max/Yes or No"put it into yy1put the number of characters of yy1 into zipif zip > 9 thenbeep 1repeat until zip ≤ 9beep 1ask "What is answer number 2" with "9 letters max/Yes or No"put it into yy1put the number of characters of yy1 into zipend repeatend ifset the name of card button "new button" to yy1end ifif answertype = "True-False" thenset the name of card button "new button" to "True"set the name of card button "new button" to "False"put "True" into xx1put "False" into yy1end ifif answertype = "A-B" thenset the name of card button "new button" to "A"set the name of card button "new button" to "B"put "A" into xx1put "B" into yy1end ifif answertype = "Yes-No" thenset the name of card button "new button" to "Yes"set the name of card button "new button" to "No"put "Yes" into xx1put "No" into yy1end ifset the loc of card button 2 to 176,253set the loc of card button 3 to 337,253set lockscreen to falsehide msg boxwait 100answer "Does that look alright" with "No" or "Yes"if it is "No" thentonesend ifgo to card cdnameif fldloc = "yes1" thenput xx1 into card fld "yes3"put yy1 into card fld "no3"end ifif fldloc = "no1" thenput xx1 into card fld "yes2"put yy1 into card fld "no2"end ifif fldloc = "yes3" thenput xx1 into card fld "yes7"put yy1 into card fld "no7"end ifif fldloc = "no3" thenput xx1 into card fld "yes6"put yy1 into card fld "no6"end ifif fldloc = "yes2" thenput xx1 into card fld "yes5"put yy1 into card fld "no5"end ifif fldloc = "no2" thenput xx1 into card fld "yes4"put yy1 into card fld "no4"end ifif fldloc = "no4" thenput xx1 into card fld "yes1"put yy1 into card fld "no1"end ifif fldloc = "yes4" thenput xx1 into card fld "yes1"put yy1 into card fld "no1"end ifif fldloc = "no5" thenput xx1 into card fld "yes1"put yy1 into card fld "no1"end ifif fldloc = "yes5" thenput xx1 into card fld "yes1"put yy1 into card fld "no1"end ifif fldloc = "no6" thenput xx1 into card fld "yes1"put yy1 into card fld "no1"end ifif fldloc = "yes6" thenput xx1 into card fld "yes1"put yy1 into card fld "no1"end ifif fldloc = "no7" thenput xx1 into card fld "yes1"put yy1 into card fld "no1"end ifif fldloc = "yes7" thenput xx1 into card fld "yes1"put yy1 into card fld "no1"end ifchoose browse toolgo to card cdnamehide meend mouseUpon tonesglobal x, aligntype, buttontype, answertype, fonttype, sizetypeput empty into card fld "ha"select card button 2domenu "clear button"select card button 2domenu "clear button"choose select toolput card fld fonttypes of card default into ftput card fld fontsize of card default into stput card fld buttontypes of card default into btanswer "Choose type of font do you want?" with "OK"DoList 999,ft,oneif item 2 of the result is empty thenput "Geneva" into ftelseput item 2 of the result into ftend ifanswer "Choose size of font do you want?" with "OK"DoList 999,st,oneif item 2 of the result is empty thenput 24 into stelseput item 2 of the result into stend ifset the textFont of card fld "ha" to ftset the textSize of card fld "ha" to stanswer "Align the field: Left, Right, Center" with¬"Left" or "Right" or "Center"if it is "Left" thenset textAlign of card fld "ha" to leftend ifif it is "Right" thenset textAlign of card fld "ha" to rightend ifif it is "Center" thenset textAlign of card fld "ha" to centerend ifanswer "Choose type of button do you want?" with "OK"DoList 999,bt,oneif item 2 of the result is empty thenput "Shadow" into btelseput item 2 of the result into btend ifchoose button toolput 2 into funrepeat 2 timesdomenu "new button"set the style of card button fun to btadd 1 to funend repeatset the loc of card button 2 to 176,253set the loc of card button 3 to 337,253ask "What is answer number 1" with answertypeput it into xx1put the number of characters of xx1 into zipif zip > 6 thenbeep 1repeat until zip ≤ 6beep 1ask "What is answer number 1" with "6 letters max"put it into xx1put the number of characters of xx1 into zipend repeatend ifset the name of card button "new button" to xx1ask "What is answer number 2" with answertypeput it into yy1put the number of characters of yy1 into zipif zip > 6 thenbeep 1repeat until zip ≤ 6beep 1ask "What is answer number 2" with "6 letters max"put it into yy1put the number of characters of yy1 into zipend repeatend ifset the name of card button "new button" to yy1put card fld "funny" into card fld "ha"wait 100answer "Does that look alright" with "No" or "Yes"if it is "no" thentonesend ifif xx1 = yy1 thenanswer "You cannot have two buttons with the same names" with "OK"tonesend ifend tones</script>
    </part>
    <part>
        <id>207</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>334</left>
            <top>330</top>
            <right>346</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>conclusion</name>
        <script>on mouseUpglobal inum, fldloc, qc, cdname, fonttype, sizetype, aligntype,¬gocon, goconvarput cd fld "funny" into xif x is empty thenanswer "You havent typed a question!" with "OK"exit mouseUpend ifput id of this card into inumset lockscreen to trueset the loc of msg box to 23,208put "WORKING..." into msg boxgo to card cdnamedomenu "new field"set the name of card fld "" to inumput x into card fld inumset the lockText of card fld inum to trueset the style of card fld inum to scrollingset the lockText of card fld inum to trueset the script of card fld inum to "on mouseUp"¬&return&"hide me"&return&"end mouseUp"hide card fld inumdomenu "new button"set the name of card btn "new button" to inumset the rect of card btn inum to 4,122,68,164if fldloc = "yes1" thenset the loc of card btn inum to 124,65end ifif fldloc = "no1" thenset the loc of card btn inum to 128,222end ifif fldloc = "no3" thenset the loc of card btn inum to 255,114end ifif fldloc = "yes3" thenset the loc of card btn inum to 251,25end ifif fldloc = "yes2" thenset the loc of card btn inum to 256,194end ifif fldloc = "no2" thenset the loc of card btn inum to 256,282end ifset the showName of cd btn inum to falseset the style of cd btn inum to transparentset the script of card btn inum to "on mouseUp"¬&return&"show card fld "&quote&inum&quote¬&return&"end mouseUp"domenu "back"if aligntype is empty thenask "What type of alignment do you want?" with "Center"put it into alelseput aligntype into alend ifif fonttype is empty thenask "What type of font do you want?" with "Helvetica"put it into ftelseput fonttype into ftend ifif sizetype is empty thenask "What size font do you want?" with "24"put it into werelseput sizetype into werend ifdomenu "new field"set the name of card fld "" to "ha"set the style of card fld "ha" to scrollingset the rect of card fld "ha" to 6,61,507,200set the textFont of card fld "ha" to ftset the textSize of card fld "ha" to werset the textAlign of card fld "ha" to alhide card fld "funny"put card fld "funny" into card fld "ha"hide msg boxset lockscreen to falsewait 100answer "Does that look alright" with "No" or "Yes"if it is "No" thentonesend ifif gocon is "Yes" thenchoose button tooldomenu "new button"set the name of card button "new button" to "Restart Consultation"set the rect of cd btn "Restart Consultation" to 351,276,508,295set the loc of cd btn "Restart Consultation" to 429,285set the style of cd btn "Restart Consultation" to checkBoxset the script of cd btn "Restart Consultation" to "on mouseUp"¬&return&"go to stack ExpertMenu"¬&return&"end mouseUp"domenu "new button"set the name of card button "new button" to "Another Question?"set the rect of cd btn "Another Question?" to 6,276,150,295set the loc of cd btn "Another Question?" to 78,285set the style of cd btn "Another Question?" to checkBoxset the script of cd btn "Another Question?" to "on mouseUp"¬&return&"go to card ques"&goconvar¬&return&"end mouseUp"domenu "new button"set the name of card button "new button" to "Quit"set the rect of cd btn "Quit" to 222,316,322,338set the loc of cd btn "Quit" to 272,327set the style of cd btn "Quit" to checkBoxset the script of cd btn "Quit" to "on mouseUp"¬&return&"domenu "&quote&"Quit Hypercard"&quote¬&return&"end mouseUp"elsechoose button tooldomenu "new button"set the name of card button "new button" to "Restart Consultation"set the rect of cd btn "Restart Consultation" to 351,276,508,295set the loc of cd btn "Restart Consultation" to 429,285set the style of cd btn "Restart Consultation" to checkBoxset the script of cd btn "Restart Consultation" to "on mouseUp"¬&return&"go to stack ExpertMenu"¬&return&"end mouseUp"domenu "new button"set the name of card button "new button" to "Quit"set the rect of cd btn "Quit" to 222,316,322,338set the loc of cd btn "Quit" to 78,285set the style of cd btn "Quit" to checkBoxset the script of cd btn "Quit" to "on mouseUp"¬&return&"domenu "&quote&"Quit Hypercard"&quote¬&return&"end mouseUp"end ifchoose browse toolgo to card cdnamehide meend mouseUpon tonesglobal x, aligntype, fonttype, sizetypeput empty into card fld "ha"put card fld fonttypes of card default into ftput card fld fontsize of card default into stput card fld buttontypes of card default into btanswer "Choose type of font do you want?" with "OK"DoList 999,ft,oneif item 2 of the result is empty thenput "Geneva" into ftelseput item 2 of the result into ftend ifanswer "Choose size of font do you want?" with "OK"DoList 999,st,oneif item 2 of the result is empty thenput 24 into stelseput item 2 of the result into stend ifset the textFont of card fld "ha" to ftset the textSize of card fld "ha" to stanswer "Align the field: Left, Right, Center" with¬"Left" or "Right" or "Center"if it is "Left" thenset textAlign of card fld "ha" to leftend ifif it is "Right" thenset textAlign of card fld "ha" to rightend ifif it is "Center" thenset textAlign of card fld "ha" to centerend ifput card fld "funny" into card fld "ha"wait 100answer "Does that look alright" with "Yes" or "No"if it is "no" thentonesend ifend tones</script>
    </part>
    <part>
        <id>233</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>3</left>
            <top>267</top>
            <right>32</right>
            <bottom>280</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>con count</name>
        <script></script>
    </part>
    <part>
        <id>234</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>3</left>
            <top>256</top>
            <right>32</right>
            <bottom>268</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ans count</name>
        <script></script>
    </part>
    <part>
        <id>242</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>3</left>
            <top>244</top>
            <right>32</right>
            <bottom>257</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>cd count</name>
        <script></script>
    </part>
    <part>
        <id>328</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>156</left>
            <top>120</top>
            <right>356</right>
            <bottom>205</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>card id 7459</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <part>
        <id>334</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>6</left>
            <top>123</top>
            <right>66</right>
            <bottom>136</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <textHeight>12</textHeight>
        <name>label1</name>
        <script></script>
    </part>
    <part>
        <id>335</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>94</left>
            <top>47</top>
            <right>154</right>
            <bottom>60</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <textHeight>12</textHeight>
        <name>label2</name>
        <script></script>
    </part>
    <part>
        <id>336</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>222</left>
            <top>6</top>
            <right>282</right>
            <bottom>19</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <textHeight>12</textHeight>
        <name>label7</name>
        <script></script>
    </part>
    <part>
        <id>337</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>225</left>
            <top>95</top>
            <right>285</right>
            <bottom>108</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <textHeight>12</textHeight>
        <name>label6</name>
        <script></script>
    </part>
    <part>
        <id>338</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>226</left>
            <top>175</top>
            <right>285</right>
            <bottom>188</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <textHeight>12</textHeight>
        <name>label5</name>
        <script></script>
    </part>
    <part>
        <id>339</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>226</left>
            <top>263</top>
            <right>285</right>
            <bottom>275</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <textHeight>12</textHeight>
        <name>label4</name>
        <script></script>
    </part>
    <part>
        <id>341</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>98</left>
            <top>204</top>
            <right>158</right>
            <bottom>217</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <textHeight>12</textHeight>
        <name>label3</name>
        <script></script>
    </part>
    <part>
        <id>351</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>156</left>
            <top>120</top>
            <right>356</right>
            <bottom>205</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>card id 6501</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <part>
        <id>476</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>366</left>
            <top>330</top>
            <right>378</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>deleted</name>
        <script>on mouseUpglobal inum, fldloc, qc, cdname,¬tox, toy, qcc, btn2, btn1, fonttype,¬answertype, sizetype, buttontype, aligntype, anx, anyy, spec1, spec2,¬xx1, yy1put cd fld "funny" into xif x is empty thenanswer "You havent typed a question!" with "OK"exit mouseUpend ifput id of this card into inumset lockscreen to trueset the loc of msg box to 23,208put "WORKING..." into msg boxgo to card cdnamedomenu "new field"set the name of card fld "" to inumput x into card fld inumset the lockText of card fld inum to trueset the style of card fld inum to scrollingset the lockText of card fld inum to trueset the script of card fld inum to "on mouseUp"¬&return&"hide me"&return&"end mouseUp"hide card fld inumdomenu "new button"set the name of card btn "new button" to inumset the rect of card btn inum to 4,122,68,164if fldloc = "begin" thenset the loc of card btn inum to 36,143end ifif fldloc = "yes1" thenset the loc of card btn inum to 124,65end ifif fldloc = "no1" thenset the loc of card btn inum to 128,222end ifif fldloc = "no3" thenset the loc of card btn inum to 255,114end ifif fldloc = "yes3" thenset the loc of card btn inum to 251,25end ifif fldloc = "yes2" thenset the loc of card btn inum to 256,194end ifif fldloc = "no2" thenset the loc of card btn inum to 256,282end ifset the showName of cd btn inum to falseset the style of cd btn inum to transparentset the script of card btn inum to "on mouseUp"¬&return&"show card fld "&quote&inum&quote¬&return&"end mouseUp"domenu "back"if aligntype is empty thenask "What type of alignment do you want?" with "Center"put it into alelseput aligntype into alend ifif fonttype is empty thenask "What type of font do you want?" with "Helvetica"put it into ftelseput fonttype into ftend ifif sizetype is empty thenask "What size font do you want?" with "24"put it into werelseput sizetype into werend ifdomenu "new field"set the name of card fld "" to "ha"set the style of card fld "ha" to scrollingset the rect of card fld "ha" to 6,61,507,200set the textFont of card fld "ha" to ftset the textSize of card fld "ha" to werset the textAlign of card fld "ha" to alhide card fld "funny"put card fld "funny" into card fld "ha"if buttontype is empty thenask "What type of button do you want?" with "shadow"put it into btntypelseput buttontype into btntypend ifchoose button toolput 2 into funrepeat 2 timesdomenu "new button"set the style of card button fun to btntypadd 1 to funend repeatbutscripset the loc of card button 2 to 176,253set the loc of card button 3 to 337,253set lockscreen to falsehide msg boxwait 100answer "Does that look alright" with "No" or "Yes"if it is "No" thentonesend ifchoose browse toolgo to card cdnameput xx1 into card fld spec1put yy1 into card fld spec2hide meend mouseUpon butscripglobal answertype, xx1,yy1,tox,toy,anx,anyy,savedif answertype = "Variable" or answertype is empty thenask "What is answer number 1" with "9 letters max/Yes or No"put it into xx1put the number of characters of xx1 into zipif zip > 9 thenbeep 1repeat until zip ≤ 9beep 1ask "What is answer number 1" with "9 letters max/Yes or No"put it into xx1put the number of characters of xx1 into zipend repeatend ifif anx = "Question" thenset the script of card button "new button" to "on mouseUp"¬&return&"go to card ques"&tox¬&return&"end mouseUp"end ifif anx = "Conclusion" thenset the script of card button "new button" to "on mouseUp"¬&return&"go to card con"&tox¬&return&"end mouseUp"end ifif anx = empty thenset the script of card button "new button" to "on mouseUp"¬&return&"go to card "&tox¬&return&"end mouseUp"end ifset the name of card button "new button" to xx1ask "What is answer number 2" with "9 letters max/Yes or No"put it into yy1put the number of characters of yy1 into zipif zip > 9 thenbeep 1repeat until zip ≤ 9beep 1ask "What is answer number 2" with "9 letters max/Yes or No"put it into yy1put the number of characters of yy1 into zipend repeatend ifif anyy = "Question" thenset the script of card button "new button" to "on mouseUp"¬&return&"go to card ques"&toy¬&return&"end mouseUp"end ifif anyy = "Conclusion" thenset the script of card button "new button" to "on mouseUp"¬&return&"go to card con"&toy¬&return&"end mouseUp"end ifif anyy = empty thenset the script of card button "new button" to "on mouseUp"¬&return&"go to card "&toy¬&return&"end mouseUp"end ifset the name of card button "new button" to yy1end ifif anx = empty thenif answertype = "True-False" thenset the name of card button "new button" to "True"set the script of card button "True" to "on mouseUp"¬&return&"go to card "&tox¬&return&"end mouseUp"put "True" into xx1end ifif answertype = "A-B" thenset the name of card button "new button" to "A"set the script of card button "A" to "on mouseUp"¬&return&"go to card "&tox¬&return&"end mouseUp"put "A" into xx1end ifif answertype = "Yes-No" thenset the name of card button "new button" to "Yes"set the script of card button "Yes" to "on mouseUp"¬&return&"go to card "&tox¬&return&"end mouseUp"put "Yes" into xx1end ifend ifif anyy = empty thenif answertype = "True-False" thenset the name of card button "new button" to "False"set the script of card button "False" to "on mouseUp"¬&return&"go to card "&toy¬&return&"end mouseUp"put "False" into yy1end ifif answertype = "A-B" thenset the name of card button "new button" to "B"set the script of card button "B" to "on mouseUp"¬&return&"go to card "&toy¬&return&"end mouseUp"put "B" into yy1end ifif answertype = "Yes-No" thenset the name of card button "new button" to "No"set the script of card button "No" to "on mouseUp"¬&return&"go to card "&toy¬&return&"end mouseUp"put "No" into yy1end ifend ifif anx = "Question" thenif answertype = "True-False" thenset the name of card button "new button" to "True"set the script of card button "True" to "on mouseUp"¬&return&"go to card ques"&tox¬&return&"end mouseUp"put "True" into xx1end ifif answertype = "A-B" thenset the name of card button "new button" to "A"set the script of card button "A" to "on mouseUp"¬&return&"go to card ques"&tox¬&return&"end mouseUp"put "A" into xx1end ifif answertype = "Yes-No" thenset the name of card button "new button" to "Yes"set the script of card button "Yes" to "on mouseUp"¬&return&"go to card ques"&tox¬&return&"end mouseUp"put "Yes" into xx1end ifend ifif anx = "Conclusion" thenif answertype = "True-False" thenset the name of card button "new button" to "True"set the script of card button "True" to "on mouseUp"¬&return&"go to card con"&tox¬&return&"end mouseUp"put "True" into xx1end ifif answertype = "A-B" thenset the name of card button "new button" to "A"set the script of card button "A" to "on mouseUp"¬&return&"go to card con"&tox¬&return&"end mouseUp"put "A" into xx1end ifif answertype = "Yes-No" thenset the name of card button "new button" to "Yes"set the script of card button "Yes" to "on mouseUp"¬&return&"go to card con"&tox¬&return&"end mouseUp"put "Yes" into xx1end ifend ifif anyy = "Conclusion" thenif answertype = "True-False" thenset the name of card button "new button" to "False"set the script of card button "False" to "on mouseUp"¬&return&"go to card con"&toy¬&return&"end mouseUp"put "False" into yy1end ifif answertype = "A-B" thenset the name of card button "new button" to "B"set the script of card button "B" to "on mouseUp"¬&return&"go to card con"&toy¬&return&"end mouseUp"put "B" into yy1end ifif answertype = "Yes-No" thenset the name of card button "new button" to "No"set the script of card button "No" to "on mouseUp"¬&return&"go to card con"&toy¬&return&"end mouseUp"put "No" into yy1end ifend ifif anyy = "Question" thenif answertype = "True-False" thenset the name of card button "new button" to "False"set the script of card button "False" to "on mouseUp"¬&return&"go to card ques"&toy¬&return&"end mouseUp"put "False" into yy1end ifif answertype = "A-B" thenset the name of card button "new button" to "B"set the script of card button "B" to "on mouseUp"¬&return&"go to card ques"&toy¬&return&"end mouseUp"put "B" into yy1end ifif answertype = "Yes-No" thenset the name of card button "new button" to "No"set the script of card button "No" to "on mouseUp"¬&return&"go to card ques"&toy¬&return&"end mouseUp"put "No" into yy1end ifend ifend butscripon tonesglobal x, aligntype, buttontype, answertype, fonttype, sizetype,¬xx1, yy1put empty into card fld "ha"select card button 2domenu "clear button"select card button 2domenu "clear button"choose select toolput card fld fonttypes of card default into ftput card fld fontsize of card default into stput card fld buttontypes of card default into btanswer "Choose type of font do you want?" with "OK"DoList 999,ft,oneif the result is empty thenput "Geneva" into ftelseput item 2 of the result into ftend ifanswer "Choose size of font do you want?" with "OK"DoList 999,st,oneif item 2 of the result is empty thenput 24 into stelseput item 2 of the result into stend ifset the textFont of card fld "ha" to ftset the textSize of card fld "ha" to stanswer "Align the field: Left, Right, Center" with¬"Left" or "Right" or "Center"if it is "Left" thenset textAlign of card fld "ha" to leftend ifif it is "Right" thenset textAlign of card fld "ha" to rightend ifif it is "Center" thenset textAlign of card fld "ha" to centerend ifanswer "Choose type of button do you want?" with "OK"DoList 999,bt,oneif item 2 of the result is empty thenput "Shadow" into btelseput item 2 of the result into btend ifchoose button toolput 2 into funrepeat 2 timesdomenu "new button"set the style of card button fun to btadd 1 to funend repeatset the loc of card button 2 to 176,253set the loc of card button 3 to 337,253put answertype into savedput variable into answertypebutscripput saved into answertypeput card fld "funny" into card fld "ha"wait 100answer "Does that look alright" with "No" or "Yes"if it is "no" thentonesend ifif xx1 = yy1 thenanswer "You cannot have two buttons with the same names" with "OK"tonesend ifend tones</script>
    </part>
    <part>
        <id>477</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>411</left>
            <top>246</top>
            <right>512</right>
            <bottom>268</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>clear tree</name>
        <script>on mouseUpanswer "This will clear the whole system" with "OK" or "CANCEL"if it is "CANCEL" then exit mouseUpput "WORKING...." into msgset lockscreen to trueput empty into card fld "dqcount"put empty into card fld "dccount"put empty into card fld "ans count"put empty into card fld "con count"put empty into card fld "cd count"put empty into card fld yes1put empty into card fld yes2put empty into card fld yes3put empty into card fld yes4put empty into card fld yes5put empty into card fld yes6put empty into card fld yes7put empty into card fld no1put empty into card fld no2put empty into card fld no3put empty into card fld no4put empty into card fld no5put empty into card fld no6put empty into card fld no7put empty into card fld ques1put empty into card fld ques2put empty into card fld ques3put empty into card fld ques4put empty into card fld ques5put empty into card fld ques6put empty into card fld ques7put empty into card fld label1put empty into card fld label2put empty into card fld label3put empty into card fld label4put empty into card fld label5put empty into card fld label6put empty into card fld label7put empty into card fld no4fldput empty into card fld no5fldput empty into card fld no6fldput empty into card fld no7fldput empty into card fld yes4fldput empty into card fld yes5fldput empty into card fld yes6fldput empty into card fld yes7fldput empty into card fld "problem"choose button toolput 7 into yput the number of card buttons into xsubtract 6 from xrepeat x timesselect card button ydomenu "clear button"end repeatchoose field toolput 53 into yput the number of card fields into xsubtract 52 from xrepeat x timesshow card fld yselect card fld ydomenu "clear field"end repeatrepeat with x = 1 to the number of cardsgo to card ques1put the short name of this card into xif x = "Build" or x = "full" or x = "fulltoo" or x = "default" thengo to next cardelsedomenu "delete card"end ifend repeatchoose browse toolgo to cd buildhide msgset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>541</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>397</left>
            <top>1</top>
            <right>440</right>
            <bottom>13</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>yes7fld</name>
        <script></script>
    </part>
    <part>
        <id>542</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>397</left>
            <top>39</top>
            <right>440</right>
            <bottom>51</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>no7fld</name>
        <script></script>
    </part>
    <part>
        <id>543</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>400</left>
            <top>92</top>
            <right>443</right>
            <bottom>104</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>yes6fld</name>
        <script></script>
    </part>
    <part>
        <id>544</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>402</left>
            <top>123</top>
            <right>445</right>
            <bottom>135</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>no6fld</name>
        <script></script>
    </part>
    <part>
        <id>545</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>403</left>
            <top>172</top>
            <right>457</right>
            <bottom>188</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>yes5fld</name>
        <script></script>
    </part>
    <part>
        <id>546</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>404</left>
            <top>205</top>
            <right>447</right>
            <bottom>217</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>no5fld</name>
        <script></script>
    </part>
    <part>
        <id>547</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>403</left>
            <top>263</top>
            <right>446</right>
            <bottom>275</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>yes4fld</name>
        <script></script>
    </part>
    <part>
        <id>548</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>403</left>
            <top>294</top>
            <right>446</right>
            <bottom>306</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>no4fld</name>
        <script></script>
    </part>
    <part>
        <id>582</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>411</left>
            <top>294</top>
            <right>512</right>
            <bottom>316</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Default</name>
        <script>on mouseUpgo to card defaultshow card button "To tree"hide card button "return"end mouseUp</script>
    </part>
    <part>
        <id>1710</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>402</left>
            <top>89</top>
            <right>510</right>
            <bottom>175</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>problem</name>
        <script></script>
    </part>
    <part>
        <id>1711</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>124</left>
            <top>304</top>
            <right>182</right>
            <bottom>342</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>dccount</name>
        <script></script>
    </part>
    <part>
        <id>1760</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>31</left>
            <top>304</top>
            <right>88</right>
            <bottom>342</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>dqcount</name>
        <script></script>
    </part>
    <part>
        <id>2001</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>411</left>
            <top>270</top>
            <right>512</right>
            <bottom>292</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Edit</name>
        <script>on mouseUpglobal tox, toy, fldloc, qcc, btn1,¬btn2, cdname, answertype, rpl1, rpl2, anx, anyy, rem, pp, spec1, spec2put empty into spec1put empty into spec2put empty into fldlocput empty into anxput empty into anyyput the short name of this card into tempput empty into aput empty into bput empty into cput empty into dput empty into eput empty into fput empty into gput card fld ques1 into aput card fld label1 into a1put card fld ques2 into bput card fld label2 into b1put card fld ques3 into cput card fld label3 into c1put card fld ques4 into dput card fld label4 into d1put card fld ques5 into eput card fld label5 into e1put card fld ques6 into fput card fld label6 into f1put card fld ques7 into gput card fld label7 into g1put empty into a3put empty into b3put empty into c3put empty into d3put empty into e3put empty into f3put empty into g3answer"Edit 1.Question or 2.Conclusion" with "Ques" or "Con" or "Cancel"put it into remif rem is "Cancel" then exit mouseUpif rem is "Ques" thenask "Enter the question number to delete"if it is empty then exit mouseUpput it into painset lockscreen to trueput "WORKING.." into msggo to card "ques"&painput the id of this card into nmdomenu "delete card"go to card tempend ifif rem is "Con" thenask "Enter the conclusion number to delete"if it is empty then exit mouseUphide msgset lockscreen to trueput it into painif a = pain and a1 = "Conclusion" thenadd 10000 to paingo to card "con"&painsubtract 10000 from painput the id of this card into nmdomenu "delete card"go to card tempelseput it into paingo to card "con"&painput the id of this card into nmdomenu "delete card"go to card tempend ifend ifput the short name of this card into cdnameif a = pain and a1 = "Question" and rem = "Ques" thenif cdname ≠ "full" thenput card fld "ques2" into virput card fld "ques3" into vir2if vir is empty and vir2 is empty thenput "butques"&pain into workput "bac"&pain into wkget loc of card button wkget loc of card button wkclick at itselect card button workdomenu "clear button"put the short name of this card into finndomenu "back"domenu "delete card"go to card finnsubtract 1 from card fld "cd count"subtract 1 from card fld "ans count"show card fld "yes6fld"find "ques"&painput the foundField into janeshow janeselect text in janedomenu "Clear Text"choose browse toolhide janeif cd fld dqcount = 0 thenput pain&"," into card fld dqcountelseput ","&pain after last item in card fld dqcountend ifend ifelsesubtract 1 from card fld "ans count"put 100 into a3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes1put empty into card fld no1put empty into card fld ques1put empty into card fld label1put card fld "ques2" into virput card fld "ques3" into vir2if vir is empty and vir2 is empty thengo to card buildchoose browse toolput empty into a3hide msgexit mouseUpend ifend ifend ifchoose browse toolif b = pain and b1 = "Question" and rem = "Ques" thenput 100 into b3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes3put empty into card fld no3put empty into card fld ques2put empty into card fld label2subtract 1 from card fld "ans count"choose browse toolif cd fld dqcount = 0 thenput pain&"," into card fld dqcountelseput ","&pain after last item in card fld dqcountend ifend ifif c = pain and c1 = "Question" and rem = "Ques" thenput 100 into c3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes2put empty into card fld no2put empty into card fld ques3put empty into card fld label3subtract 1 from card fld "ans count"choose browse toolif cd fld dqcount = 0 thenput pain&"," into card fld dqcountelseput ","&pain after last item in card fld dqcountend ifend ifif d = pain and d1 = "Question" and rem = "Ques" thenput 100 into d3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes4put empty into card fld no4put empty into card fld ques4put empty into card fld label4subtract 1 from card fld "ans count"choose browse toolif cd fld dqcount = 0 thenput pain&"," into card fld dqcountelseput ","&pain after last item in card fld dqcountend ifend ifif e = pain and e1 = "Question" and rem = "Ques" thenput 100 into e3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes5put empty into card fld no5put empty into card fld ques5put empty into card fld label5subtract 1 from card fld "ans count"choose browse toolif cd fld dqcount = 0 thenput pain&"," into card fld dqcountelseput ","&pain after last item in card fld dqcountend ifend ifif f = pain and f1 = "Question" and rem = "Ques" thenput 100 into f3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes6put empty into card fld no6put empty into card fld ques6put empty into card fld label6subtract 1 from card fld "ans count"choose browse toolif cd fld dqcount = 0 thenput pain&"," into card fld dqcountelseput ","&pain after last item in card fld dqcountend ifend ifif g = pain and g1 = "Question" and rem = "Ques" thenput 100 into g3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes7put empty into card fld no7put empty into card fld ques7put empty into card fld label7subtract 1 from card fld "ans count"choose browse toolif cd fld dqcount = 0 thenput pain&"," into card fld dqcountelseput ","&pain after last item in card fld dqcountend ifend ifif a = pain and a1 = "Conclusion" and rem = "Con" thenif cdname ≠ "full" thenadd 10000 to painput "butcon"&pain into workput "bac"&pain into wksubtract 10000 from painget loc of card button wkclick at itselect card button workdomenu "clear button"put the short name of this card into finndomenu "back"domenu "delete card"go to card finnsubtract 1 from card fld "cd count"subtract 1 from card fld "con count"add 10000 to painfind "con"&painput the foundField into janeshow janeselect text in janedomenu "Clear Text"choose browse toolhide janesubtract 10000 from painchoose browse toolif cd fld dccount of cd full = 0 thenput pain&"," into card fld dccountelseput ","&pain after last item in card fld dccountend ifelseput 100 into a3select card button button1domenu "clear button"show card fld answer1select card fld answer1domenu "clear field"put empty into card fld yes1put empty into card fld no1put empty into card fld ques1put empty into card fld label1choose browse toolend ifend ifif b = pain and b1 = "Conclusion" and rem = "Con" thenput 100 into b3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes3put empty into card fld no3put empty into card fld ques2put empty into card fld label2subtract 1 from card fld "con count"choose browse toolif cd fld dccount = 0 thenput pain&"," into card fld dccountelseput ","&pain after last item in card fld dccountend ifend ifif c = pain and c1 = "Conclusion" and rem = "Con" thenput 100 into c3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes2put empty into card fld no2put empty into card fld ques3put empty into card fld label3subtract 1 from card fld "con count"choose browse toolif cd fld dccount = 0 thenput pain&"," into card fld dccountelseput ","&pain after last item in card fld dccountend ifend ifif d = pain and d1 = "Conclusion" and rem = "Con" thenput 100 into d3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes4put empty into card fld no4put empty into card fld ques4put empty into card fld label4subtract 1 from card fld "con count"choose browse toolif cd fld dccount = 0 thenput pain&"," into card fld dccountelseput ","&pain after last item in card fld dccountend ifend ifif e = pain and e1 = "Conclusion" and rem = "Con" thenput 100 into e3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes5put empty into card fld no5put empty into card fld ques5put empty into card fld label5subtract 1 from card fld "con count"choose browse toolif cd fld dccount = 0 thenput pain&"," into card fld dccountelseput ","&pain after last item in card fld dccountend ifend ifif f = pain and f1 = "Conclusion" and rem = "Con" thenput 100 into f3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes6put empty into card fld no6put empty into card fld ques6put empty into card fld label6subtract 1 from card fld "con count"choose browse toolif cd fld dccount = 0 thenput pain&"," into card fld dccountelseput ","&pain after last item in card fld dccountend ifend ifif g = pain and g1 = "Conclusion" and rem = "Con" thenput 100 into g3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes7put empty into card fld no7put empty into card fld ques7put empty into card fld label7subtract 1 from card fld "con count"choose browse toolif cd fld dccount = 0 thenput pain&"," into card fld dccountelseput ","&pain after last item in card fld dccountend ifend ifif a3 = 100 thenput card fld label2 into anxput card fld label3 into anyyput card fld ques2 into xput card fld ques3 into yif x is empty and y is empty thenhide msgexit mouseUpelseadd 1 to card fld "ans count"if rem = "Con" thenput "Conclusion" into card fld label1if the number of items in cd fld dccount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dccountend ifelseput "Question" into card fld label1if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifend ifput x into toxput y into toyput a into qccput a into card fld ques1put "begin" into fldlocanswer "There is a question after this question" with "OK"answer "We must do a replacement question" with "OK"replaceput rpl1 into card fld yes1put "yes1" into spec1put rpl1 into btn1put rpl2 into card fld no1put rpl2 into btn2put "no1" into spec2fillend ifend ifif b3 = 100 thenput card fld label7 into anxput card fld label6 into anyyput card fld ques7 into xput card fld ques6 into yif x is empty and y is empty thenhide msgexit mouseUpelseadd 1 to card fld "ans count"if rem = "Con" thenput "Conclusion" into card fld label2if the number of items in cd fld dccount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dccountend ifelseput "Question" into card fld label2if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifend ifput x into toxput y into toyput b into qccput b into card fld ques2put "yes1" into fldlocanswer "There is a question after this question" with "OK"answer "We must do a replacement question" with "OK"replaceput rpl1 into card fld yes3put "yes3" into spec1put rpl1 into btn1put rpl2 into card fld no3put rpl2 into btn2put "no3" into spec2fillend ifend ifif c3 = 100 thenput card fld label5 into anxput card fld label4 into anyyput card fld ques5 into xput card fld ques4 into yif x is empty and y is empty thenhide msgexit mouseUpelseadd 1 to card fld "ans count"if rem = "Con" thenput "Conclusion" into card fld label3if the number of items in cd fld dqcount = 1 thenput 0 into card fld dccountelsedelete last item of card fld dccountend ifelseput "Question" into card fld label3if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifend ifput x into toxput y into toyput c into qccput c into card fld ques3put "no1" into fldlocanswer "There is a question after this question" with "OK"answer "We must do a replacement question" with "OK"replaceput rpl1 into card fld yes2put "yes2" into spec1put rpl1 into btn1put rpl2 into card fld no2put rpl2 into btn2put "no2" into spec2fillend ifend ifif d3 = 100 thenput card fld yes4fld into xput card fld no4fld into yif x is empty and y is empty thenhide msgexit mouseUpelseadd 1 to card fld "ans count"if rem = "Con" thenput "Conclusion" into card fld label4if the number of items in cd fld dccount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dccountend ifelseput "Question" into card fld label4if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifend ifput x into toxput y into toyput d into qccput d into card fld ques4put "no2" into fldlocanswer "There is a question after this question" with "OK"answer "We must do a replacement question" with "OK"replaceput rpl1 into card fld yes4put "yes4" into spec1put rpl1 into btn1put rpl2 into card fld no4put rpl2 into btn2put "no4" into spec2fillend ifend ifif e3 = 100 thenput card fld yes5fld into xput card fld no5fld into yif x is empty and y is empty thenhide msgexit mouseUpelseadd 1 to card fld "ans count"if rem = "Con" thenput "Conclusion" into card fld label5if the number of items in cd fld dqcount = 1 thenput 0 into card fld dccountelsedelete last item of card fld dccountend ifelseput "Question" into card fld label5if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifend ifput x into toxput y into toyput e into qccput e into card fld ques5put "yes2" into fldlocanswer "There is a question after this question" with "OK"answer "We must do a replacement question" with "OK"replaceput rpl1 into card fld yes5put "yes5" into spec1put rpl1 into btn1put rpl2 into card fld no5put rpl2 into btn2put "no5" into spec2fillend ifend ifif f3 = 100 thenput card fld yes6fld into xput card fld no6fld into yif x is empty and y is empty thenhide msgexit mouseUpelseadd 1 to card fld "ans count"if rem = "Con" thenput "Conclusion" into card fld label6if the number of items in cd fld dccount = 1 thenput 0 into card fld dccountelsedelete last item of card fld dqcountend ifelseput "Question" into card fld label6if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifend ifput x into toxput y into toyput f into qccput f into card fld ques6put "no3" into fldlocanswer "There is a question after this question" with "OK"answer "We must do a replacement question" with "OK"if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifreplaceput rpl1 into card fld yes6put "yes6" into spec1put rpl1 into btn1put rpl2 into card fld no6put rpl2 into btn2put "no6" into spec2fillend ifend ifif g3 = 100 thenput card fld yes7fld into xput card fld no7fld into yif x is empty and y is empty thenhide msgexit mouseUpelseadd 1 to card fld "ans count"if rem = "Con" thenput "Conclusion" into card fld label7if the number of items in cd fld dccount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dccountend ifelseput "Question" into card fld label7if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifend ifput x into toxput y into toyput g into qccput g into card fld ques7put "yes3" into fldlocanswer "There is a question after this question" with "OK"answer "We must do a replacement question" with "OK"if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifreplaceput rpl1 into card fld yes7put "yes7" into spec1put rpl1 into btn1put rpl2 into card fld no7put rpl2 into btn2put "no7" into spec2fillend ifend ifset lockscreen to falsehide msgend mouseUpon fillglobal qcc, rem, ppput script of card fld "deleted" into ppgo to last carddomenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44if rem = "Ques" thentype "Question:"set the name of this card to "ques"&qccelsetype "Conclusion"set the name of this card to "con"&qccend ifchoose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to ppchoose browse tooldomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to centerset the style of card fld funny to scrollingchoose browse toolclick at 246,131end fillon replaceglobal answertype, rpl1, rpl2if answertype = "True-False" thenput "True" into rpl1put "False" into rpl2end ifif answertype = "A-B" thenput "A" into rpl1put "B" into rpl2end ifif answertype = "Yes-No" thenput "Yes" into rpl1put "No" into rpl2end ifend replace</script>
    </part>
    <part>
        <id>2025</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>316</left>
            <top>330</top>
            <right>330</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>expertmenu</name>
        <script>on mouseUpask "Enter the edit id number to delete"if it is empty then exit mouseupput it into xput the number of card flds into totif x > tot thenanswer "There is no id number "&xexit mouseUpend ifanswer "Are you sure you want to delete item "&x with "OK" or "Wait"if it is "Wait" then exit mouseUpput the short name of card fld x into dldelete first word of dldelete first character of dldelete last character of dlput deletefile(dl) into returnthisif returnthis = 0 thenanswer "It is gone"elseif returnthis < 0 thenOsErr returnthiselseanswer "Whoops, there was an error"end ifend ifput the number of cards into yif y > 1 thenput the short name of this card into nmego to last cardput the number of card buttons into cbput card fld cb into savedput the script of card button cb into savedbtnif cb = 1 thendomenu "delete card"elsechoose field toolselect card fld cbdomenu "clear field"choose button toolselect button cbdomenu "clear button"subtract 1 from bg fld hidderend ifgo to card nmeput saved into card fld xset the script of card button x to savedbtnchoose fld toolelseput the number of card buttons into cbchoose field toolselect card fld cbdomenu "clear field"choose button toolselect button cbdomenu "clear button"subtract 1 from bg fld hidderchoose browse toolend ifchoose browse toolif y > 1 thenanswer "It was replaced with the last menu item" with "OK"end ifend mouseUp</script>
    </part>
    <part>
        <id>2035</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>297</left>
            <top>330</top>
            <right>311</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>stackscr</name>
        <script>on openStackgo to first cardput the number of cd buttons into xif x = 0 thenput x into bg fld hidderend ifend openStackon closeStackgo to first cardput the number of cd buttons into xif x = 0 thenput x into bg fld hidderend ifend closeStack</script>
    </part>
    <part>
        <id>2054</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>287</left>
            <top>330</top>
            <right>299</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>deletestack</name>
        <script>on openStackput the long name of this stack into tempgo to card "default"put FontName() into rssput rss into card fld fonttypesgo to card buildanswer "Is this a new or old system" with "New" or "Old"if it is "New" thengo to card "full"put card fld "ques1" into xif x is empty thengo to card buildanswer "Click on Built Expert System to begin." with "OK"show card fld helpelseanswer "There is already a system here" with "OK"end ifend ifif it is "Old" thengo to card "full"put card fld "ques1" into xif x is empty thenanswer "There is no system to work on" with "OK"go to card buildshow card fld helpanswer "Click on Built Expert System to begin." with "OK"end ifend ifend openStackon closeStackdomenu "compact stack"end closeStack</script>
    </part>
    <part>
        <id>2055</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>156</left>
            <top>120</top>
            <right>356</right>
            <bottom>205</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>card id 4043</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <part>
        <id>2059</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>410</left>
            <top>317</top>
            <right>512</right>
            <bottom>339</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Home</name>
        <script>on mouseUpgo homeend mouseUp</script>
    </part>
    <part>
        <id>2120</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>411</left>
            <top>223</top>
            <right>512</right>
            <bottom>245</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Save System</name>
        <script>on mouseUpglobal savedscr, trag, exp, p, scr, pep, filenameanswer "1.Save a copy of tree 2.Finished with system" with "1" or "2" or "Cancel"if it is "Cancel" then exit mouseUpif it is "1" thendomenu "Save a copy..."exit mouseUpend ifanswer "Are you sure your finished?" with "OK" or "Cancel"if it is "Cancel" then exit mouseUpput the script of this stack into savedscr--set the script of this stack to ""put the long name of this stack into pput the long name of this stack into xput the number of characters in x into yput the script of card fld expertmenu into expput the script of card fld stackscr into scrset the loc of msg box to 10,300put "Looking for ExpertMenu Stack" into msg boxset cursor to watchrepeat y timesif character y of x = ":" thenexit repeatelsedelete character y of xend ifsubtract 1 from ynext repeatend repeatdelete first word of xdelete first character of xget Files(x)put it into scopeput the number of words in scope into nmrepeat nm timesif word nm of scope = "ExpertMenu" thenput 1 into tragexit repeatelseput 2 into tragend ifsubtract 1 from nmend repeatput "WORKING" into msgfoundfunif pep = 1 thenset the script of this stack to savedscrexit mouseUpend ifpush cardput card fld "ans count" into yput card fld "con count" into zadd y to zgo to card "ques1"put the number of this card into rttset lockmessages to truehide msganswer "Choose a name for you Expert System" with "OK"answer "Click new when finished" with "OK"domenu "New Stack..."put "WORKING" into msgput the short name of this stack into testitif testit = "HyperExpert 2.4" thenset the script of this stack to savedscrgo to card fullhide msgexit mouseUpend ifput the long name of this stack into zzzset the script of this stack to "on openStack"¬&return&"go to card ques1"¬&return&"end openStack"pop cardput the number of cards into xxsubtract rtt from xxadd 1 to xxrepeat xx timesset lockmessages to truego to card rttdomenu "copy card"go to zzzdomenu "paste card"go padd 1 to rttend repeatgo pput cd fld "problem" of card "full" into pmmgo to stack "ExpertMenu"repeat until bg fld hidder ≠ 5go to next cardend repeatif bg fld "hidder" = 0 thenchoose field tooldomenu "new field"set the style of card fld "" to scrollingset the rect of cd fld "" to 166,120,403,185set the loc of cd fld "" to 284,71put pmm into card fld ""set the lockText of cd fld "" to trueset the name of cd fld "" to zzzchoose button tooldomenu "new button"set the rect of cd button "new button" to 69,277,163,305set the loc of cd button "new button" to 114,53set the style of cd button "new button" to shadowset the autoHilite of cd button "new button" to trueset the script of card button "new button" to "on mouseUp"¬&return&"go to "&zzz¬&return&"end mouseUp"set the name of cd button "new button" to selecthide bg fld hidderend ifif bg fld "hidder" = 1 thenchoose field tooldomenu "new field"set the style of card fld "" to scrollingset the rect of cd fld "" to 166,120,403,185set the loc of cd fld "" to 284,152put pmm into card fld ""set the lockText of cd fld "" to trueset the name of cd fld "" to zzzchoose button tooldomenu "new button"set the rect of cd button "new button" to 69,277,163,305set the loc of cd button "new button" to 114,134set the style of cd button "new button" to shadowset the autoHilite of cd button "new button" to trueset the script of card button "new button" to "on mouseUp"¬&return&"go to "&zzz¬&return&"end mouseUp"set the name of cd button "new button" to selecthide bg fld hidderend ifif bg fld "hidder" = 2 thenchoose field tooldomenu "new field"set the style of card fld "" to scrollingset the rect of cd fld "" to 166,120,403,185set the loc of cd fld "" to 284,231put pmm into card fld ""set the lockText of cd fld "" to trueset the name of cd fld "" to zzzchoose button tooldomenu "new button"set the rect of cd button "new button" to 69,277,163,305set the loc of cd button "new button" to 114,213set the style of cd button "new button" to shadowset the autoHilite of cd button "new button" to trueset the script of card button "new button" to "on mouseUp"¬&return&"go to "&zzz¬&return&"end mouseUp"set the name of cd button "new button" to selecthide bg fld hidderend ifif bg fld "hidder" = 3 thenchoose field tooldomenu "new field"set the style of card fld "" to scrollingset the rect of cd fld "" to 166,120,403,185set the loc of cd fld "" to 284,309put pmm into card fld ""set the lockText of cd fld "" to trueset the name of cd fld "" to zzzchoose button tooldomenu "new button"set the rect of cd button "new button" to 69,277,163,305set the loc of cd button "new button" to 114,291set the style of cd button "new button" to shadowset the autoHilite of cd button "new button" to trueset the script of card button "new button" to "on mouseUp"¬&return&"go to "&zzz¬&return&"end mouseUp"set the name of cd button "new button" to selecthide bg fld hidderend ifif bg fld "hidder" = 4 thenadd 1 to bg fld hidderdomenu "new card"choose field tooldomenu "new field"set the name of cd fld "" to hidderchoose field tooldomenu "new field"set the style of card fld "" to scrollingset the rect of cd fld "" to 166,120,403,185set the loc of cd fld "" to 284,71put pmm into card fld ""set the lockText of cd fld "" to trueset the name of cd fld "" to zzzchoose button tooldomenu "new button"set the rect of cd button "new button" to 69,277,163,305set the loc of cd button "new button" to 114,53set the style of cd button "new button" to shadowset the autoHilite of cd button "new button" to trueset the script of card button "new button" to "on mouseUp"¬&return&"go to "&zzz¬&return&"end mouseUp"set the name of cd button "new button" to selecthide bg fld hidderend ifif bg fld "hidder" is empty thenput 0 into bg fld "hidder"elseadd 1 to bg fld "hidder"end ifgo pgo to card "full"hide msganswer "Are you finished with this system" with "OK" or "CANCEL"if it is "CANCEL" thenchoose browse toolset the script of this stack to savedscrexit mouseUpend ifanswer "This will clean out the tree" with "CANCEL" or "OK"if it is "CANCEL" thenchoose browse toolset the script of this stack to savedscrexit mouseUpend ifput "WORKING" into msgset the script of this stack to savedscrput empty into card fld "ans count"put empty into card fld "con count"put empty into card fld "cd count"put empty into card fld yes1put empty into card fld yes2put empty into card fld yes3put empty into card fld yes4put empty into card fld yes5put empty into card fld yes6put empty into card fld yes7put empty into card fld no1put empty into card fld no2put empty into card fld no3put empty into card fld no4put empty into card fld no5put empty into card fld no6put empty into card fld no7put empty into card fld ques1put empty into card fld ques2put empty into card fld ques3put empty into card fld ques4put empty into card fld ques5put empty into card fld ques6put empty into card fld ques7put empty into card fld label1put empty into card fld label2put empty into card fld label3put empty into card fld label4put empty into card fld label5put empty into card fld label6put empty into card fld label7put empty into card fld no4fldput empty into card fld no5fldput empty into card fld no6fldput empty into card fld no7fldput empty into card fld yes4fldput empty into card fld yes5fldput empty into card fld yes6fldput empty into card fld yes7fldput empty into card fld dqcountput empty into card fld dccountput empty into cd fld problemchoose button toolput 7 into yput the number of card buttons into xsubtract 6 from xrepeat x timesselect card button ydomenu "clear button"end repeatchoose field toolput 53 into yput the number of card fields into xsubtract 52 from xrepeat x timesshow card fld yselect card fld ydomenu "clear field"end repeatrepeat with x = 1 to the number of cardsgo to card ques1put the short name of this card into xif x = "Build" or x = "full" or x = "fulltoo" or x = "default" thengo to next cardelsedomenu "delete card"end ifend repeatchoose browse toolgo to card buildset lockmessages to falsehide msganswer "Click on Build Expert System to start again"end mouseUpon foundfunglobal trag, exp, savedscr, p, scr, fileNamehide msg boxif trag = 2 thenanswer "Cant find stack ExpertMenu, must make new one"set lockmessages to trueput newFileName("Click on the Save button","ExpertMenu") into fileNamenewStack fileNamego stack fileNamedomenu "Convert Stack..."put the short name of this stack into namput the long name of this stack into namerdelete first word of namerdelete first character of namerdelete last character of namerif nam ≠ "ExpertMenu" thenanswer "It must be named ExpertMenu (one word)" with "Silly me"go pput 1 into pepexit foundfunend ifdomenu "Background"choose button tooldomenu "new button"set the rect of bg button "new button" to 444,294,504,331set the loc of bg button "new button" to 474,312set the style of bg btn "new button" to transparentset the autoHilite of bg btn "new button" to trueset the showName of bg btn "new button" to falseset the icon of bg button "new button" to "Lge Next Arrow"set the script of bg btn "new button" to "on mouseUp"¬&return&"go to next card"¬&return&"end mouseUp"set the name of bg button "new button" to "Next"domenu "New Button"set the rect of bg button "New button" to 0,29,46,48set the loc of bg button "New button" to 23,38set the style of bg btn "New button" to shadowset the script of bg btn "New button" to expset the name of bg btn "New button" to "Edit"domenu "New Button"set the rect of bg button "New button" to 0,29,46,48set the loc of bg button "New button" to 21,331set the style of bg btn "New button" to shadowset the script of bg btn "New button" to "on mouseUp"&return&¬"domenu "&quote&"quit hypercard"&quote&return&"end mouseUp"set the name of bg btn "New button" to "Quit"choose text toolset the textAlign to leftset the textFont to Genevaset the textSize to 12set the textStyle to bold, shadow, outlineclick at 10,13type "HyperExpert Menu"click at 412,49set the textStyle to plainset the textSize to 9put 1 into lilput 49 into plcrepeat 4 timesclick at 412,plctype "Edit ID Number: "&liladd 1 to liladd 81 to plcend repeatchoose line toolset the lineSize to 1click at 0,20drag from 0,20 to 511,20set the lineSize to 2drag from 0,23 to 511,23choose field tooldomenu "New Field"set the name of bg fld "" to "hidder"put 0 into bg fld "hidder"hide bg fld hidderdomenu "Background"set the script of this stack to scrgo pput the long name of this stack into thisnamedelete first word of thisnamedelete first character of thisnamedelete last character of thisnameResCopy thisname,namer,XFCN,345elseexit foundfunend ifend foundfun</script>
    </part>
    <part>
        <id>2036</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>0</left>
            <top>0</top>
            <right>512</right>
            <bottom>342</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>help</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <content>
        <layer>card</layer>
        <id>328</id>
        <text>This is six</text>
    </content>
    <content>
        <layer>card</layer>
        <id>2036</id>
        <text>HyperExpert Help - click on field to close it***Load this stack onto your Hard disk or it will run very slow if you don't. Use HyperCard and not SuperCard. I have experienced some problems with this stack  while using SuperCard.****************For those of you who can't wait to get started.************     Step 1 - First click on the button "Build Expert System"     Step 2 - It will ask you to define the problem to be worked on. This is the                     problem that the end users are having. For Example - My car wont                                       start. Common questions or problems which get asked frequently                   is one way to think of it.     Step 3 - Set Defaults. The HyperExpert Stack is designed to make setting                    up your system as quick and easy as possible. The defaults are                    so you can set your cards how you want them to look one time,                    and then you wont have to do it again. Like all Yes-No questions.     Step 4 - After setting defaults you will have to click on the "Build Expert                       System" button again to get started.      Step 5 - Now you start your questioning to come to a conclusion about                     the problem. For example, if your problem is "My car wont start"                            then a good first question would be "Did you check the gas tank".                    You enter it in the proper field and click finished when done.      Step 6 - Now your at the tree portion of the stack. IF YOU CLICK ON THE                     QUESTION 1 BOX YOU CAN SEE THE QUESTION YOU JUST TYPED. You                    can also see the answers you have assigned for Question 1                    (i.e Yes, No). Now click on the answer to the question you                   would like to work with next. For example - your question was                    "Did you check the gas tank" and if they                     answer "No" you want to reach a conclusion at that point.                    So click on the "No" answer box next to the box labeled                     Question 1.      Step 7 - After clicking on the "No" box of Question 1 HyperExpert will ask                    if you want a question or a conclusion. If you choose                     conclusion, HyperExpert will ask you if you want the conclusion                    to go to another question. For example you might have another                     question you might want to ask even though you have reached                     one conclusion already. Simply enter the question number here.      Step 8 - Now type your conclusion, like "You should check your gas tank"                     click finished when done.      Step 9 - Now if your satisfied with all of your questions and conclusions                    click "Save System" and HyperExpert will begin to look for                     the stack "ExpertMenu". If this is the first time you have used                     HyperExpert it will not find the stack and will ask you to make a                     new one. When the new stack window comes up click save and                    dont change the name of the stack. You also need to name your                    question stacks. You may call these whatever you like. These                    are the stacks that the ExpertMenu Stack references.      Step 10 - Your finished. Now give the ExpertMenu stack                     and the question stacks you created to the people who need your                    expertise. This may have sounded like a lot of steps but                    after using this stack once or twice it becomes very intuitive.                    Remember you can make the system as big as the memory and                    disk space of your own Mac will allow.                    You keep the HyperExpert Shell Stack for creating other systems.                        **A word of advise, make sure all of your questions eventually                        end with a conclusion, or your users may end up going down                        a path to no conclusion.                    **Note there is an edit button included on the ExpertMenu Stack.                        This allows anyone to remove the files you have created. You                        may want to remove this button, but it is up to you. It is                         primarily for your use.                                              **Button Functions****Build Expert System**Obviously is the first button you click on to get the process of building your system started.**Clear Tree**This button clears out the tree and the question cards that you have created. It is to be used if you have already saved the system or made some type of error that made it necessary to get rid of the entire system.**Default Settings**This button takes you to the area where you can decide what type of default settings you would like to have for your individual question cards**Edit**This button allows you to edit a question after you have created it. If the question is in the middle of the tree (i.e. there are other questions after it), then a replacement question must be created. If the question is at the end of the tree and there are no other questions after it, then it can be delete without having to replace the question.     There is an edit button on the ExpertMenu stack. It will delete the question stack of your choice. You may decide to remove this button before you give it to your end users. Its up to you.**Set Answer Types**This is a popup menu which gives you a choice of answer types to set as a default. For example -- Yes-No, True-False. After setting this default all of your answer types will be of this kind. Notice there is a Variable answer type for answers which don't fit into one of the given categories.**Set Button Types**This is a popup menu which gives you the standard Hypercard choices for button types.**Set Font Size** This is a popup menu which sets the font size of the field containing your answer or question.**Set Font Types**This is a list menu generated by the Dolist XCMD.  It loads all the fonts you have available in your system and gives you the choice of which font you want to use for the field your question or conclusion is contained. **Set Text Align**This is a popup menu which allows you to choose a type of alignment (left, right, center) for the field which contains your question or conclusion.**Save System**This button saves your questions and conclusions to a separate stack. It will prompt you to name your stack and if you have not created an ExpertMenu stack you will be prompted to do that as well.                                            **Field Information****Deleted Conclusions**This field shows the conclusion numbers you have deleted. HyperExpert re-uses these numbers until the field contains a zero and then it starts numbering from the last conclusion.**Deleted Questions**This field shows the question numbers you have deleted. HyperExpert re-uses these numbers until the field contains a zero and then it starts numbering from the last question.**Name of Problem**Obviously this is the name of the problem you defined in the beginning.**Total Cards**This is the total number of TREE cards. For instance if you fill up the tree card will all seven questions then add an eighth question, you would then be starting another tree card, so at that point you would have 2 tree cards or 2 total cards.**Total Questions**This is the total number of questions not counting conclusions.**Total Conclusions**This is the total number of conclusions not counting questions.</text>
    </content>
    <content>
        <layer>card</layer>
        <id>2055</id>
        <text>did you check the gas</text>
    </content>
    <name>fulltoo</name>
    <script>on openCardput the script of this stack into xif x = empty thenput the script of cd fld deletestack into yset the script of this stack to yanswer "Making repairs to stack"answer "It must be re-opened"domenu "Quit Hypercard"end ifhide card fld yes7fldhide card fld yes6fldhide card fld yes5fldhide card fld yes4fldhide card fld no7fldhide card fld no6fldhide card fld no5fldhide card fld no4fldhide card fld deletedhide card fld conclusionhide card fld finishedhide card fld stackscrhide card fld expertmenuhide card fld deletestackend openCard</script>
</card>


card_3191.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<card>
    <id>3191</id>
    <filler1>0</filler1>
    <bitmap>BMAP_3563.pbm</bitmap>
    <cantDelete> <true /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <owner>2738</owner>
    <link rel="stylesheet" type="text/css" href="stylesheet_4443.css" />
    <part>
        <id>1</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>57</left>
            <top>98</top>
            <right>117</right>
            <bottom>111</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>yes1</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "yes1" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "ques2" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "Cancel" thenexit mouseUpend ifput the short name of this card into cdnameif it is "OK" thenanswer "Is this 1.Conclusion  2.Question?" with "1" or "2"if it is "2" thenput "Question" into card fld label2if cd fld "dqcount" ≠ 0 thenput item 1 of card fld dqcount into qcif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end ifput the script of card fld "finished" into pput qc into card fld ques2add 1 to card fld "ans count"elseput card fld "ans count" into qcput the script of card fld "finished" into padd 1 to qcput qc into card fld "ans count"put qc into card fld ques2end ifput card fld ques2 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques1 into qcgo to card "ques"&qcadd 1 to qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131elseanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifput "Conclusion" into card fld label2if card fld dccount ≠ 0 thenput item 1 of card fld dccount into qcif the number of items in cd fld dccount = 1 thenput 0 into card fld dccountelsedelete item 1 of cd fld dccountend ifput the script of card fld "conclusion" into zzput qc into card fld ques2add 1 to cd fld "con count"elseput card fld "con count" into qcput the script of card fld "conclusion" into zzadd 1 to qcput qc into card fld "con count"put qc into card fld ques2end ifput card fld ques2 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques1 into qcgo to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>2</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>57</left>
            <top>174</top>
            <right>117</right>
            <bottom>186</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>no1</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "no1" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "ques3" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "Cancel" thenexit mouseUpend ifput the short name of this card into cdnameif it is "OK" thenanswer "Is this  1.Conclusion   2.Question?" with "1" or "2"if it is "2" thenput "Question" into card fld label3if cd fld "dqcount" ≠ 0 thenput item 1 of card fld dqcount into qcif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end ifput the script of card fld "finished" into pput qc into card fld ques3add 1 to card fld "ans count"elseput card fld "ans count" into qcput the script of card fld "finished" into padd 1 to qcput qc into card fld "ans count"put qc into card fld ques3end ifput card fld ques3 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques1 into qcgo to card "ques"&qcadd 1 to qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"go to last carddomenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131elseanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifput "Conclusion" into card fld label3if card fld dccount ≠ 0 thenput item 1 of card fld dccount into qcif the number of items in cd fld dccount = 1 thenput 0 into card fld dccountelsedelete item 1 of cd fld dccountend ifput the script of card fld "conclusion" into zzput qc into card fld ques3add 1 to cd fld "con count"elseput card fld "con count" into qcput the script of card fld "conclusion" into zzadd 1 to qcput qc into card fld "con count"put qc into card fld ques3end ifput card fld ques3 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques1 into qcgo to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>3</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>157</left>
            <top>31</top>
            <right>214</right>
            <bottom>43</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>yes3</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "yes3" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "ques7" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "Cancel" thenexit mouseUpend ifput the short name of this card into cdnameif it is "OK" thenanswer "Is this 1.Conclusion  2.Question?" with "1" or "2"if it is "2" thenput "Question" into card fld label7if cd fld "dqcount" ≠ 0 thenput item 1 of card fld dqcount into qcif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end ifput the script of card fld "finished" into pput qc into card fld ques7add 1 to card fld "ans count"elseput card fld "ans count" into qcput the script of card fld "finished" into padd 1 to qcput qc into card fld "ans count"put qc into card fld ques7end ifput card fld ques7 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques2 into qcgo to card "ques"&qcadd 1 to qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131elseanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifput "Conclusion" into card fld label7if card fld dccount ≠ 0 thenput item 1 of card fld dccount into qcif the number of items in cd fld dccount = 1 thenput 0 into card fld dccountelsedelete item 1 of cd fld dccountend ifput the script of card fld "conclusion" into zzput qc into card fld ques7add 1 to cd fld "con count"elseput card fld "con count" into qcput the script of card fld "conclusion" into zzadd 1 to qcput qc into card fld "con count"put qc into card fld ques7end ifput card fld ques7 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques2 into qcgo to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>4</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>157</left>
            <top>87</top>
            <right>216</right>
            <bottom>99</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>no3</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "no3" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "ques6" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "Cancel" thenexit mouseUpend ifput the short name of this card into cdnameif it is "OK" thenanswer "Is this 1.Conclusion  2.Question?" with "1" or "2"if it is "2" thenput "Question" into card fld label6if cd fld "dqcount" ≠ 0 thenput item 1 of card fld dqcount into qcif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end ifput the script of card fld "finished" into pput qc into card fld ques6add 1 to card fld "ans count"elseput card fld "ans count" into qcput the script of card fld "finished" into padd 1 to qcput qc into card fld "ans count"put qc into card fld ques6end ifput card fld ques6 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques2 into qcgo to card "ques"&qcadd 1 to qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131elseanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifput "Conclusion" into card fld label6if card fld dccount ≠ 0 thenput item 1 of card fld dccount into qcif the number of items in cd fld dccount = 1 thenput 0 into card fld dccountelsedelete item 1 of cd fld dccountend ifput the script of card fld "conclusion" into zzput qc into card fld ques6add 1 to cd fld "con count"elseput card fld "con count" into qcput the script of card fld "conclusion" into zzadd 1 to qcput qc into card fld "con count"put qc into card fld ques6end ifput card fld ques6 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques2 into qcgo to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>5</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>160</left>
            <top>188</top>
            <right>219</right>
            <bottom>200</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>yes2</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "yes2" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "ques5" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "Cancel" thenexit mouseUpend ifput the short name of this card into cdnameif it is "OK" thenanswer "Is this 1.Conclusion  2.Question?" with "1" or "2"if it is "2" thenput "Question" into card fld label5if cd fld "dqcount" ≠ 0 thenput item 1 of card fld dqcount into qcif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end ifput the script of card fld "finished" into pput qc into card fld ques5add 1 to card fld "ans count"elseput card fld "ans count" into qcput the script of card fld "finished" into padd 1 to qcput qc into card fld "ans count"put qc into card fld ques5end ifput card fld ques5 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques3 into qcgo to card "ques"&qcadd 1 to qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"go to last carddomenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131elseanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifput "Conclusion" into card fld label5if card fld dccount ≠ 0 thenput item 1 of card fld dccount into qcif the number of items in cd fld dccount = 1 thenput 0 into card fld dccountelsedelete item 1 of cd fld dccountend ifput the script of card fld "conclusion" into zzput qc into card fld ques5add 1 to cd fld "con count"elseput card fld "con count" into qcput the script of card fld "conclusion" into zzadd 1 to qcput qc into card fld "con count"put qc into card fld ques5end ifput card fld ques5 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques3 into qcgo to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>6</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>160</left>
            <top>244</top>
            <right>219</right>
            <bottom>256</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>no2</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "no2" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "ques4" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "Cancel" thenexit mouseUpend ifput the short name of this card into cdnameif it is "OK" thenanswer "Is this 1.Conclusion  2.Question?" with "1" or "2"if it is "2" thenput "Question" into card fld label4if cd fld "dqcount" ≠ 0 thenput item 1 of card fld dqcount into qcif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end ifput the script of card fld "finished" into pput qc into card fld ques4add 1 to card fld "ans count"elseput card fld "ans count" into qcput the script of card fld "finished" into padd 1 to qcput qc into card fld "ans count"put qc into card fld ques4end ifput card fld ques4 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques3 into qcgo to card "ques"&qcadd 1 to qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"go to last carddomenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131elseanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifput "Conclusion" into card fld label4if card fld dccount ≠ 0 thenput item 1 of card fld dccount into qcif the number of items in cd fld dccount = 1 thenput 0 into card fld dccountelsedelete item 1 of cd fld dccountend ifput the script of card fld "conclusion" into zzput qc into card fld ques4add 1 to cd fld "con count"elseput card fld "con count" into qcput the script of card fld "conclusion" into zzadd 1 to qcput qc into card fld "con count"put qc into card fld ques4end ifput card fld ques4 into qccput the short name of me into fldlocput card fld fldloc into xput card fld ques3 into qcgo to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollingchoose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>7</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>287</left>
            <top>4</top>
            <right>344</right>
            <bottom>16</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>yes7</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "yes7" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "yes7fld" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "CANCEL" thenexit mouseUpelseadd 1 to card fld "cd count"put the short name of me into fldlocput the short name of this card into cdnameput card fld ques7 into qcput the number of card buttons into cbanswer "Is this a 1.Conclusion 2.Question?" with "1" or "2"put it into zxxif zxx = 2 thenif cd fld "dqcount" = 0 thenput card fld "ans count" into qccadd 1 to qccput qcc into card fld "ans count"elseput item 1 of card fld dqcount into qccif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end ifput qcc into card fld "ans count"--add 1 to qccend ifend ifif zxx = 1 thenanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifif cd fld "dccount" = 0 thenput card fld "con count" into qccput card fld "con count" into qccsavedadd 1 to qccadd 1 to qccsavedelseput item 1 of card fld dccount into qccput item 1 of card fld dccount into qccsavedif the number of items in cd fld dccount = 1 thenput 0 into cd fld dccountelsedelete item 1 of cd fld dccountend ifend ifput qcc into card fld "con count"add 10000 to qccend ifput card fld "ans count" into rtput card fld "con count" into ttput card fld "cd count" into ptput card fld "dccount" into xdput card fld "dqcount" into zdput cd fld problem into pmdomenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Next Arrow"set the loc of card btn "new button" to 382,8set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card full"&qcc¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"if zxx = "2" thenset the name of card button "new button" to "butques"&qccelseset the name of card button "new button" to "butcon"&qccend ifif zxx = "2" thenput "ques"&qcc into card fld yes7fldelseput "con"&qcc into card fld yes7fldend ifgo to card fulltoodomenu "copy card"domenu "paste card"set the name of this card to "full"&qccput rt into card fld "ans count"put pt into card fld "cd count"put tt into card fld "con count"put xd into card fld "dccount"put zd into card fld "dqcount"put pm into cd fld "problem"domenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Prev Arrow"set the loc of card btn "new button" to 17,176set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card "&cdname¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"set the name of card button "new button" to "bac"&qccput the short name of this card into cdnameif zxx is "2" thenput the script of card fld "finished" into pput qcc into card fld ques1put "Question" into card fld label1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your question in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131elseput the script of card fld "conclusion" into zzput "Conclusion" into card fld "label1"put qccsaved into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your conclusion in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>8</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>287</left>
            <top>34</top>
            <right>344</right>
            <bottom>46</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>no7</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "no7" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "no7fld" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "CANCEL" thenexit mouseUpelseadd 1 to card fld "cd count"put the short name of me into fldlocput the short name of this card into cdnameput card fld ques7 into qcput the number of card buttons into cbanswer "Is this a 1.Conclusion 2.Question?" with "1" or "2"put it into zxxif zxx = 2 thenif cd fld "dqcount" = 0 thenput card fld "ans count" into qccadd 1 to qccput qcc into card fld "ans count"elseput item 1 of card fld dqcount into qccif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end if--add 1 to qccput qcc into card fld "ans count"end ifend ifif zxx = 1 thenanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifif cd fld "dccount" = 0 thenput card fld "con count" into qccput card fld "con count" into qccsavedadd 1 to qccadd 1 to qccsavedelseput item 1 of card fld dccount into qccput item 1 of card fld dccount into qccsavedif the number of items in cd fld dccount = 1 thenput 0 into cd fld dccountelsedelete item 1 of cd fld dccountend ifend ifput qcc into card fld "con count"add 10000 to qccend ifput card fld "ans count" into rtput card fld "con count" into ttput card fld "cd count" into ptput card fld "dccount" into xdput card fld "dqcount" into zdput cd fld problem into pmdomenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Next Arrow"set the loc of card btn "new button" to 382,41set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card full"&qcc¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"if zxx = "2" thenset the name of card button "new button" to "butques"&qccelseset the name of card button "new button" to "butcon"&qccend ifif zxx = "2" thenput "ques"&qcc into card fld no7fldelseput "con"&qcc into card fld no7fldend ifgo to card fulltoodomenu "copy card"domenu "paste card"set the name of this card to "full"&qccput rt into card fld "ans count"put tt into card fld "con count"put pt into card fld "cd count"put xd into card fld "dccount"put zd into card fld "dqcount"put pm into cd fld "problem"domenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Prev Arrow"set the loc of card btn "new button" to 17,176set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card "&cdname¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"set the name of card button "new button" to "bac"&qccput the short name of this card into cdnameif zxx is "2" thenput the script of card fld "finished" into pput qcc into card fld ques1put "Question" into card fld label1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your question in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131elseput the script of card fld "conclusion" into zzput "Conclusion" into card fld "label1"put qccsaved into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your conclusion in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>9</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>290</left>
            <top>93</top>
            <right>344</right>
            <bottom>105</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>yes6</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "yes6" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "yes6fld" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "CANCEL" thenexit mouseUpelseadd 1 to card fld "cd count"put the short name of me into fldlocput the short name of this card into cdnameput card fld ques6 into qcput the number of card buttons into cbanswer "Is this a 1.Conclusion 2.Question?" with "1" or "2"put it into zxxif zxx = 2 thenif cd fld "dqcount" = 0 thenput card fld "ans count" into qccadd 1 to qccput qcc into card fld "ans count"elseput item 1 of card fld dqcount into qccif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end if--add 1 to qccput qcc into card fld "ans count"end ifend ifif zxx = 1 thenanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifif cd fld "dccount" = 0 thenput card fld "con count" into qccput card fld "con count" into qccsavedadd 1 to qccadd 1 to qccsavedelseput item 1 of card fld dccount into qccput item 1 of card fld dccount into qccsavedif the number of items in cd fld dccount = 1 thenput 0 into cd fld dccountelsedelete item 1 of cd fld dccountend ifend ifput qcc into card fld "con count"add 10000 to qccend ifput card fld "ans count" into rtput card fld "con count" into ttput card fld "cd count" into ptput card fld "dccount" into xdput card fld "dqcount" into zdput cd fld problem into pmdomenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Next Arrow"set the loc of card btn "new button" to 382,98set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card full"&qcc¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"if zxx = "2" thenset the name of card button "new button" to "butques"&qccelseset the name of card button "new button" to "butcon"&qccend ifif zxx = "2" thenput "ques"&qcc into card fld yes6fldelseput "con"&qcc into card fld yes6fldend ifgo to card fulltoodomenu "copy card"domenu "paste card"set the name of this card to "full"&qccput rt into card fld "ans count"put tt into card fld "con count"put pt into card fld "cd count"put xd into card fld "dccount"put zd into card fld "dqcount"put pm into cd fld "problem"domenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Prev Arrow"set the loc of card btn "new button" to 17,176set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card "&cdname¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"set the name of card button "new button" to "bac"&qccput the short name of this card into cdnameif zxx is "2" thenput the script of card fld "finished" into pput qcc into card fld ques1put "Question" into card fld label1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your question in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131elseput the script of card fld "conclusion" into zzput "Conclusion" into card fld "label1"put qccsaved into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your conclusion in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>10</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>291</left>
            <top>123</top>
            <right>344</right>
            <bottom>135</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>no6</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "no6" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "no6fld" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "CANCEL" thenexit mouseUpelseadd 1 to card fld "cd count"put the short name of me into fldlocput the short name of this card into cdnameput card fld ques6 into qcput the number of card buttons into cbanswer "Is this a 1.Conclusion 2.Question?" with "1" or "2"put it into zxxif zxx = 2 thenif cd fld "dqcount" = 0 thenput card fld "ans count" into qccadd 1 to qccput qcc into card fld "ans count"elseput item 1 of card fld dqcount into qccif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end if--add 1 to qccput qcc into card fld "ans count"end ifend ifif zxx = 1 thenanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifif cd fld "dccount" = 0 thenput card fld "con count" into qccput card fld "con count" into qccsavedadd 1 to qccadd 1 to qccsavedelseput item 1 of card fld dccount into qccput item 1 of card fld dccount into qccsavedif the number of items in cd fld dccount = 1 thenput 0 into cd fld dccountelsedelete item 1 of cd fld dccountend ifend ifput qcc into card fld "con count"add 10000 to qccend ifput card fld "ans count" into rtput card fld "con count" into ttput card fld "cd count" into ptput card fld "dccount" into xdput card fld "dqcount" into zdput cd fld problem into pmdomenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Next Arrow"set the loc of card btn "new button" to 382,131set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card full"&qcc¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"if zxx = "2" thenset the name of card button "new button" to "butques"&qccelseset the name of card button "new button" to "butcon"&qccend ifif zxx = "2" thenput "ques"&qcc into card fld no6fldelseput "con"&qcc into card fld no6fldend ifgo to card fulltoodomenu "copy card"domenu "paste card"set the name of this card to "full"&qccput rt into card fld "ans count"put tt into card fld "con count"put pt into card fld "cd count"put xd into card fld "dccount"put zd into card fld "dqcount"put pm into cd fld "problem"domenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Prev Arrow"set the loc of card btn "new button" to 17,176set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card "&cdname¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"set the name of card button "new button" to "bac"&qccput the short name of this card into cdnameif zxx is "2" thenput the script of card fld "finished" into pput qcc into card fld ques1put "Question" into card fld label1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your question in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131elseput the script of card fld "conclusion" into zzput "Conclusion" into card fld "label1"put qccsaved into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your conclusion in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>11</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>290</left>
            <top>173</top>
            <right>346</right>
            <bottom>185</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>yes5</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "yes5" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "yes5fld" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "CANCEL" thenexit mouseUpelseadd 1 to card fld "cd count"put the short name of me into fldlocput the short name of this card into cdnameput card fld ques5 into qcput the number of card buttons into cbanswer "Is this a 1.Conclusion 2.Question?" with "1" or "2"put it into zxxif zxx = 2 thenif cd fld "dqcount" = 0 thenput card fld "ans count" into qccadd 1 to qccput qcc into card fld "ans count"elseput item 1 of card fld dqcount into qccif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end if--add 1 to qccput qcc into card fld "ans count"end ifend ifif zxx = 1 thenanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifif cd fld "dccount" = 0 thenput card fld "con count" into qccput card fld "con count" into qccsavedadd 1 to qccadd 1 to qccsavedelseput item 1 of card fld dccount into qccput item 1 of card fld dccount into qccsavedif the number of items in cd fld dccount = 1 thenput 0 into cd fld dccountelsedelete item 1 of cd fld dccountend ifend ifput qcc into card fld "con count"add 10000 to qccend ifput card fld "ans count" into rtput card fld "con count" into ttput card fld "cd count" into ptput card fld "dccount" into xdput card fld "dqcount" into zdput cd fld problem into pmdomenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Next Arrow"set the loc of card btn "new button" to 382,175set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card full"&qcc¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"if zxx = "2" thenset the name of card button "new button" to "butques"&qccelseset the name of card button "new button" to "butcon"&qccend ifsubtract 1 from cbif zxx = "2" thenput "ques"&qcc into card fld yes5fldelseput "con"&qcc into card fld yes5fldend ifgo to card fulltoodomenu "copy card"domenu "paste card"set the name of this card to "full"&qccput rt into card fld "ans count"put tt into card fld "con count"put pt into card fld "cd count"put xd into card fld "dccount"put zd into card fld "dqcount"put pm into cd fld "problem"domenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Prev Arrow"set the loc of card btn "new button" to 17,176set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card "&cdname¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"set the name of card button "new button" to "bac"&qccput the short name of this card into cdnameif zxx is "2" thenput the script of card fld "finished" into pput "Question" into card fld "label1"put qcc into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your question in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131elseput the script of card fld "conclusion" into zzput "Conclusion" into card fld "label1"put qccsaved into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your conclusion in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>12</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>290</left>
            <top>201</top>
            <right>346</right>
            <bottom>213</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>no5</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "no5" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "no5fld" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "CANCEL" thenexit mouseUpelseadd 1 to card fld "cd count"put the short name of me into fldlocput the short name of this card into cdnameput card fld ques5 into qcput the number of card buttons into cbanswer "Is this a 1.Conclusion 2.Question?" with "1" or "2"put it into zxxif zxx = 2 thenif cd fld "dqcount" = 0 thenput card fld "ans count" into qccadd 1 to qccput qcc into card fld "ans count"elseput item 1 of card fld dqcount into qccif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end if--add 1 to qccput qcc into card fld "ans count"end ifend ifif zxx = 1 thenanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifif cd fld "dccount" = 0 thenput card fld "con count" into qccput card fld "con count" into qccsavedadd 1 to qccadd 1 to qccsavedelseput item 1 of card fld dccount into qccput item 1 of card fld dccount into qccsavedif the number of items in cd fld dccount = 1 thenput 0 into cd fld dccountelsedelete item 1 of cd fld dccountend ifend ifput qcc into card fld "con count"add 10000 to qccend ifput card fld "ans count" into rtput card fld "con count" into ttput card fld "cd count" into ptput card fld "dccount" into xdput card fld "dqcount" into zdput cd fld problem into pmdomenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Next Arrow"set the loc of card btn "new button" to 382,210set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card full"&qcc¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"if zxx = "2" thenset the name of card button "new button" to "butques"&qccelseset the name of card button "new button" to "butcon"&qccend ifif zxx = "2" thenput "ques"&qcc into card fld no5fldelseput "con"&qcc into card fld no5fldend ifgo to card fulltoodomenu "copy card"domenu "paste card"set the name of this card to "full"&qccput rt into card fld "ans count"put tt into card fld "con count"put pt into card fld "cd count"put xd into card fld "dccount"put zd into card fld "dqcount"put pm into cd fld "problem"domenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Prev Arrow"set the loc of card btn "new button" to 17,176set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card "&cdname¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"set the name of card button "new button" to "bac"&qccput the short name of this card into cdnameif zxx is "2" thenput the script of card fld "finished" into pput qcc into card fld ques1put "Question" into card fld label1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your question in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131elseput the script of card fld "conclusion" into zzput "Conclusion" into card fld "label1"put qccsaved into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your conclusion in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>13</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>291</left>
            <top>260</top>
            <right>347</right>
            <bottom>272</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>yes4</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "yes4" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "yes4fld" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "CANCEL" thenexit mouseUpelseadd 1 to card fld "cd count"put the short name of me into fldlocput the short name of this card into cdnameput card fld ques4 into qcput the number of card buttons into cbanswer "Is this a 1.Conclusion 2.Question?" with "1" or "2"put it into zxxif zxx = 2 thenif cd fld "dqcount" = 0 thenput card fld "ans count" into qccadd 1 to qccput qcc into card fld "ans count"elseput item 1 of card fld dqcount into qccif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end if--add 1 to qccput qcc into card fld "ans count"end ifend ifif zxx = 1 thenanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifif cd fld "dccount" = 0 thenput card fld "con count" into qccput card fld "con count" into qccsavedadd 1 to qccadd 1 to qccsavedelseput item 1 of card fld dccount into qccput item 1 of card fld dccount into qccsavedif the number of items in cd fld dccount = 1 thenput 0 into cd fld dccountelsedelete item 1 of cd fld dccountend ifend ifput qcc into card fld "con count"add 10000 to qccend ifput card fld "ans count" into rtput card fld "con count" into ttput card fld "cd count" into ptput card fld "dccount" into xdput card fld "dqcount" into zdput cd fld problem into pmdomenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Next Arrow"set the loc of card btn "new button" to 382,266set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card full"&qcc¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"if zxx = "2" thenset the name of card button "new button" to "butques"&qccelseset the name of card button "new button" to "butcon"&qccend ifif zxx = "2" thenput "ques"&qcc into card fld yes4fldelseput "con"&qcc into card fld yes4fldend ifgo to card fulltoodomenu "copy card"domenu "paste card"set the name of this card to "full"&qccput rt into card fld "ans count"put tt into card fld "con count"put pt into card fld "cd count"put xd into card fld "dccount"put zd into card fld "dqcount"put pm into cd fld "problem"domenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Prev Arrow"set the loc of card btn "new button" to 17,176set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card "&cdname¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"set the name of card button "new button" to "bac"&qccput the short name of this card into cdnameif zxx is "2" thenput the script of card fld "finished" into pput qcc into card fld ques1put "Question" into card fld label1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your question in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131elseput the script of card fld "conclusion" into zzput "Conclusion" into card fld "label1"put qccsaved into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your conclusion in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>14</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>291</left>
            <top>291</top>
            <right>347</right>
            <bottom>303</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>no4</name>
        <script>on mouseUpglobal qc, fldloc, cdname, aligntype, gocon, goconvarset lockscreen to trueput card fld "no4" into xif x is empty thenbeep 1answer "There is no answer here to work with"exit mouseUpend ifput card fld "no4fld" into eif e ≠ empty thenanswer "There is already a path for this question" with "OK"exit mouseUpend ifanswer "Work on this answer of this question" with "CANCEL" or "OK"if it is "CANCEL" thenexit mouseUpelseadd 1 to card fld "cd count"put the short name of me into fldlocput the short name of this card into cdnameput card fld ques4 into qcput the number of card buttons into cbanswer "Is this a 1.Conclusion 2.Question?" with "1" or "2"put it into zxxif zxx = 2 thenif cd fld "dqcount" = 0 thenput card fld "ans count" into qccadd 1 to qccput qcc into card fld "ans count"elseput item 1 of card fld dqcount into qccif the number of items in card fld "dqcount" = 1 thenput 0 into card fld "dqcount"elsedelete item 1 of card fld "dqcount"end if--add 1 to qccput qcc into card fld "ans count"end ifend ifif zxx = 1 thenanswer "Is this conclusion going to a question"¬with "Yes" or "No"put it into goconput empty into goconvarif gocon = "Yes" thenask "Please enter the question number"if it is empty thenexit mouseUpend ifput it into goconvarrepeat with x = 1 to the number of items in card fld dqcountif goconvar = item x of card fld dqcount thenanswer "You deleted question "&goconvarexit mouseUpend ifend repeatif goconvar > card fld "ans count" thenanswer "There is no question "&goconvarsubtract 1 from card fld "cd count"exit mouseUpend ifend ifif cd fld "dccount" = 0 thenput card fld "con count" into qccput card fld "con count" into qccsavedadd 1 to qccadd 1 to qccsavedelseput item 1 of card fld dccount into qccput item 1 of card fld dccount into qccsavedif the number of items in cd fld dccount = 1 thenput 0 into cd fld dccountelsedelete item 1 of cd fld dccountend ifend ifput qcc into card fld "con count"add 10000 to qccend ifput card fld "ans count" into rtput card fld "con count" into ttput card fld "cd count" into ptput card fld "dccount" into xdput card fld "dqcount" into zdput cd fld problem into pmdomenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Next Arrow"set the loc of card btn "new button" to 382,297set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card full"&qcc¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"if zxx = "2" thenset the name of card button "new button" to "butques"&qccelseset the name of card button "new button" to "butcon"&qccend ifif zxx = "2" thenput "ques"&qcc into card fld no4fldelseput "con"&qcc into card fld no4fldend ifgo to card fulltoodomenu "copy card"domenu "paste card"set the name of this card to "full"&qccput rt into card fld "ans count"put tt into card fld "con count"put pt into card fld "cd count"put xd into card fld "dccount"put zd into card fld "dqcount"put pm into cd fld "problem"domenu "new button"set the rect of card btn "new button" to 349,1,374,17set the showName of card btn "new button" to falseset the style of card btn "new button" to transparentset the icon of card btn "new button" to "Sml Prev Arrow"set the loc of card btn "new button" to 17,176set the script of card btn "new button" to "on mouseUp"¬&return&"put card fld "&quote&"con count"&quote&"into x"¬&return&"put card fld "&quote&"ans count"&quote&"into y"¬&return&"put card fld "&quote&"cd count"&quote&"into z"¬&return&"put card fld "&quote&"dccount"&quote&"into xd"¬&return&"put card fld "&quote&"dqcount"&quote&"into zd"¬&return&"put card fld "&quote&"problem"&quote&"into pm"¬&return&"go to card "&cdname¬&return&"put x into card fld "&quote&"con count"&quote¬&return&"put y into card fld "&quote&"ans count"&quote¬&return&"put z into card fld "&quote&"cd count"&quote¬&return&"put xd into card fld "&quote&"dccount"&quote¬&return&"put zd into card fld "&quote&"dqcount"&quote¬&return&"put pm into card fld "&quote&"problem"&quote¬&return&"end mouseUp"set the name of card button "new button" to "bac"&qccput the short name of this card into cdnameif zxx is "2" thenput the script of card fld "finished" into pput qcc into card fld ques1put "Question" into card fld label1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card ques"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Question:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to pchoose browse toolset the name of this card to "ques"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your question in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131elseput the script of card fld "conclusion" into zzput "Conclusion" into card fld "label1"put qccsaved into card fld ques1go to card "ques"&qcset the script of card button x to "on mouseUp"¬&return&"go to card con"&qcc¬&return&"end mouseUp"--domenu "new background"--set the name of this background to "questions"domenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44type "Conclusion:"choose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to zzchoose browse toolset the name of this card to "con"&qccdomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to aligntypeset the style of card fld funny to scrollinganswer "Type your conclusion in this field" with "OK"answer "Click the finished button when done" with "OK"choose browse toolclick at 246,131end ifend ifset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>39</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>11</left>
            <top>138</top>
            <right>61</right>
            <bottom>152</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ques1</name>
        <script></script>
    </part>
    <part>
        <id>40</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>100</left>
            <top>63</top>
            <right>149</right>
            <bottom>77</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ques2</name>
        <script></script>
    </part>
    <part>
        <id>41</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>104</left>
            <top>220</top>
            <right>153</right>
            <bottom>234</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ques3</name>
        <script></script>
    </part>
    <part>
        <id>42</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>227</left>
            <top>22</top>
            <right>276</right>
            <bottom>36</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ques7</name>
        <script></script>
    </part>
    <part>
        <id>43</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>231</left>
            <top>112</top>
            <right>280</right>
            <bottom>126</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ques6</name>
        <script></script>
    </part>
    <part>
        <id>44</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>231</left>
            <top>192</top>
            <right>280</right>
            <bottom>206</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ques5</name>
        <script></script>
    </part>
    <part>
        <id>45</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>232</left>
            <top>280</top>
            <right>281</right>
            <bottom>294</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ques4</name>
        <script></script>
    </part>
    <part>
        <id>62</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>411</left>
            <top>200</top>
            <right>512</right>
            <bottom>222</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Help</name>
        <script>on mouseUpshow card fld helpset the scroll of card fld help to 1end mouseUp</script>
    </part>
    <part>
        <id>64</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>351</left>
            <top>330</top>
            <right>363</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>finished</name>
        <script>on mouseUpglobal inum, fldloc, qc, cdname, buttontype,¬fonttype, sizetype, answertype, aligntypeput cd fld "funny" into xif x is empty thenanswer "You havent typed a question!" with "OK"exit mouseUpend ifput id of this card into inumset lockscreen to trueset the loc of msg box to 23,208put "WORKING..." into msg boxgo to card cdnamedomenu "new field"set the name of card fld "" to inumput x into card fld inumset the lockText of card fld inum to trueset the style of card fld inum to scrollingset the lockText of card fld inum to trueset the script of card fld inum to "on mouseUp"¬&return&"hide me"&return&"end mouseUp"hide card fld inumdomenu "new button"set the name of card btn "new button" to inumset the rect of card btn inum to 4,122,68,164if fldloc = "yes1" thenset the loc of card btn inum to 124,65end ifif fldloc = "no1" thenset the loc of card btn inum to 128,222end ifif fldloc = "no3" thenset the loc of card btn inum to 255,114end ifif fldloc = "yes3" thenset the loc of card btn inum to 251,25end ifif fldloc = "yes2" thenset the loc of card btn inum to 256,194end ifif fldloc = "no2" thenset the loc of card btn inum to 256,282end ifset the showName of cd btn inum to falseset the style of cd btn inum to transparentset the script of card btn inum to "on mouseUp"¬&return&"show card fld "&quote&inum&quote¬&return&"end mouseUp"domenu "back"if aligntype is empty thenask "What type of alignment do you want?" with "Center"put it into alelseput aligntype into alend ifif fonttype is empty thenask "What type of font do you want?" with "Helvetica"put it into ftelseput fonttype into ftif sizetype is empty thenask "What size font do you want?" with "24"put it into werelseput sizetype into werend ifend ifdomenu "new field"set the name of card fld "" to "ha"set the style of card fld "ha" to scrollingset the rect of card fld "ha" to 6,61,507,200set the textFont of card fld "ha" to ftset the textSize of card fld "ha" to werset the textAlign of card fld "ha" to alhide card fld "funny"put card fld "funny" into card fld "ha"if buttontype is empty thenask "What type of button do you want?" with "shadow"put it into btntypelseput buttontype into btntypend ifchoose button toolput 2 into funrepeat 2 timesdomenu "new button"set the style of card button fun to btntypadd 1 to funend repeatif answertype = "Variable" thenask "What is answer number 1" with "9 letters max/Yes or No"put it into xx1put the number of characters of xx1 into zipif zip > 9 thenbeep 1repeat until zip ≤ 9beep 1ask "What is answer number 1" with "9 letters max/Yes or No"put it into xx1put the number of characters of xx1 into zipend repeatend ifset the name of card button "new button" to xx1ask "What is answer number 2" with "9 letters max/Yes or No"put it into yy1put the number of characters of yy1 into zipif zip > 9 thenbeep 1repeat until zip ≤ 9beep 1ask "What is answer number 2" with "9 letters max/Yes or No"put it into yy1put the number of characters of yy1 into zipend repeatend ifset the name of card button "new button" to yy1end ifif answertype = "True-False" thenset the name of card button "new button" to "True"set the name of card button "new button" to "False"put "True" into xx1put "False" into yy1end ifif answertype = "A-B" thenset the name of card button "new button" to "A"set the name of card button "new button" to "B"put "A" into xx1put "B" into yy1end ifif answertype = "Yes-No" thenset the name of card button "new button" to "Yes"set the name of card button "new button" to "No"put "Yes" into xx1put "No" into yy1end ifset the loc of card button 2 to 176,253set the loc of card button 3 to 337,253set lockscreen to falsehide msg boxwait 100answer "Does that look alright" with "No" or "Yes"if it is "No" thentonesend ifgo to card cdnameif fldloc = "yes1" thenput xx1 into card fld "yes3"put yy1 into card fld "no3"end ifif fldloc = "no1" thenput xx1 into card fld "yes2"put yy1 into card fld "no2"end ifif fldloc = "yes3" thenput xx1 into card fld "yes7"put yy1 into card fld "no7"end ifif fldloc = "no3" thenput xx1 into card fld "yes6"put yy1 into card fld "no6"end ifif fldloc = "yes2" thenput xx1 into card fld "yes5"put yy1 into card fld "no5"end ifif fldloc = "no2" thenput xx1 into card fld "yes4"put yy1 into card fld "no4"end ifif fldloc = "no4" thenput xx1 into card fld "yes1"put yy1 into card fld "no1"end ifif fldloc = "yes4" thenput xx1 into card fld "yes1"put yy1 into card fld "no1"end ifif fldloc = "no5" thenput xx1 into card fld "yes1"put yy1 into card fld "no1"end ifif fldloc = "yes5" thenput xx1 into card fld "yes1"put yy1 into card fld "no1"end ifif fldloc = "no6" thenput xx1 into card fld "yes1"put yy1 into card fld "no1"end ifif fldloc = "yes6" thenput xx1 into card fld "yes1"put yy1 into card fld "no1"end ifif fldloc = "no7" thenput xx1 into card fld "yes1"put yy1 into card fld "no1"end ifif fldloc = "yes7" thenput xx1 into card fld "yes1"put yy1 into card fld "no1"end ifchoose browse toolgo to card cdnamehide meend mouseUpon tonesglobal x, aligntype, buttontype, answertype, fonttype, sizetypeput empty into card fld "ha"select card button 2domenu "clear button"select card button 2domenu "clear button"choose select toolput card fld fonttypes of card default into ftput card fld fontsize of card default into stput card fld buttontypes of card default into btanswer "Choose type of font do you want?" with "OK"DoList 999,ft,oneif item 2 of the result is empty thenput "Geneva" into ftelseput item 2 of the result into ftend ifanswer "Choose size of font do you want?" with "OK"DoList 999,st,oneif item 2 of the result is empty thenput 24 into stelseput item 2 of the result into stend ifset the textFont of card fld "ha" to ftset the textSize of card fld "ha" to stanswer "Align the field: Left, Right, Center" with¬"Left" or "Right" or "Center"if it is "Left" thenset textAlign of card fld "ha" to leftend ifif it is "Right" thenset textAlign of card fld "ha" to rightend ifif it is "Center" thenset textAlign of card fld "ha" to centerend ifanswer "Choose type of button do you want?" with "OK"DoList 999,bt,oneif item 2 of the result is empty thenput "Shadow" into btelseput item 2 of the result into btend ifchoose button toolput 2 into funrepeat 2 timesdomenu "new button"set the style of card button fun to btadd 1 to funend repeatset the loc of card button 2 to 176,253set the loc of card button 3 to 337,253ask "What is answer number 1" with answertypeput it into xx1put the number of characters of xx1 into zipif zip > 6 thenbeep 1repeat until zip ≤ 6beep 1ask "What is answer number 1" with "6 letters max"put it into xx1put the number of characters of xx1 into zipend repeatend ifset the name of card button "new button" to xx1ask "What is answer number 2" with answertypeput it into yy1put the number of characters of yy1 into zipif zip > 6 thenbeep 1repeat until zip ≤ 6beep 1ask "What is answer number 2" with "6 letters max"put it into yy1put the number of characters of yy1 into zipend repeatend ifset the name of card button "new button" to yy1put card fld "funny" into card fld "ha"wait 100answer "Does that look alright" with "No" or "Yes"if it is "no" thentonesend ifif xx1 = yy1 thenanswer "You cannot have two buttons with the same names" with "OK"tonesend ifend tones</script>
    </part>
    <part>
        <id>207</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>334</left>
            <top>330</top>
            <right>346</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>conclusion</name>
        <script>on mouseUpglobal inum, fldloc, qc, cdname, fonttype, sizetype, aligntype,¬gocon, goconvarput cd fld "funny" into xif x is empty thenanswer "You havent typed a question!" with "OK"exit mouseUpend ifput id of this card into inumset lockscreen to trueset the loc of msg box to 23,208put "WORKING..." into msg boxgo to card cdnamedomenu "new field"set the name of card fld "" to inumput x into card fld inumset the lockText of card fld inum to trueset the style of card fld inum to scrollingset the lockText of card fld inum to trueset the script of card fld inum to "on mouseUp"¬&return&"hide me"&return&"end mouseUp"hide card fld inumdomenu "new button"set the name of card btn "new button" to inumset the rect of card btn inum to 4,122,68,164if fldloc = "yes1" thenset the loc of card btn inum to 124,65end ifif fldloc = "no1" thenset the loc of card btn inum to 128,222end ifif fldloc = "no3" thenset the loc of card btn inum to 255,114end ifif fldloc = "yes3" thenset the loc of card btn inum to 251,25end ifif fldloc = "yes2" thenset the loc of card btn inum to 256,194end ifif fldloc = "no2" thenset the loc of card btn inum to 256,282end ifset the showName of cd btn inum to falseset the style of cd btn inum to transparentset the script of card btn inum to "on mouseUp"¬&return&"show card fld "&quote&inum&quote¬&return&"end mouseUp"domenu "back"if aligntype is empty thenask "What type of alignment do you want?" with "Center"put it into alelseput aligntype into alend ifif fonttype is empty thenask "What type of font do you want?" with "Helvetica"put it into ftelseput fonttype into ftend ifif sizetype is empty thenask "What size font do you want?" with "24"put it into werelseput sizetype into werend ifdomenu "new field"set the name of card fld "" to "ha"set the style of card fld "ha" to scrollingset the rect of card fld "ha" to 6,61,507,200set the textFont of card fld "ha" to ftset the textSize of card fld "ha" to werset the textAlign of card fld "ha" to alhide card fld "funny"put card fld "funny" into card fld "ha"hide msg boxset lockscreen to falsewait 100answer "Does that look alright" with "No" or "Yes"if it is "No" thentonesend ifif gocon is "Yes" thenchoose button tooldomenu "new button"set the name of card button "new button" to "Restart Consultation"set the rect of cd btn "Restart Consultation" to 351,276,508,295set the loc of cd btn "Restart Consultation" to 429,285set the style of cd btn "Restart Consultation" to checkBoxset the script of cd btn "Restart Consultation" to "on mouseUp"¬&return&"go to stack ExpertMenu"¬&return&"end mouseUp"domenu "new button"set the name of card button "new button" to "Another Question?"set the rect of cd btn "Another Question?" to 6,276,150,295set the loc of cd btn "Another Question?" to 78,285set the style of cd btn "Another Question?" to checkBoxset the script of cd btn "Another Question?" to "on mouseUp"¬&return&"go to card ques"&goconvar¬&return&"end mouseUp"domenu "new button"set the name of card button "new button" to "Quit"set the rect of cd btn "Quit" to 222,316,322,338set the loc of cd btn "Quit" to 272,327set the style of cd btn "Quit" to checkBoxset the script of cd btn "Quit" to "on mouseUp"¬&return&"domenu "&quote&"Quit Hypercard"&quote¬&return&"end mouseUp"elsechoose button tooldomenu "new button"set the name of card button "new button" to "Restart Consultation"set the rect of cd btn "Restart Consultation" to 351,276,508,295set the loc of cd btn "Restart Consultation" to 429,285set the style of cd btn "Restart Consultation" to checkBoxset the script of cd btn "Restart Consultation" to "on mouseUp"¬&return&"go to stack ExpertMenu"¬&return&"end mouseUp"domenu "new button"set the name of card button "new button" to "Quit"set the rect of cd btn "Quit" to 222,316,322,338set the loc of cd btn "Quit" to 78,285set the style of cd btn "Quit" to checkBoxset the script of cd btn "Quit" to "on mouseUp"¬&return&"domenu "&quote&"Quit Hypercard"&quote¬&return&"end mouseUp"end ifchoose browse toolgo to card cdnamehide meend mouseUpon tonesglobal x, aligntype, fonttype, sizetypeput empty into card fld "ha"put card fld fonttypes of card default into ftput card fld fontsize of card default into stput card fld buttontypes of card default into btanswer "Choose type of font do you want?" with "OK"DoList 999,ft,oneif item 2 of the result is empty thenput "Geneva" into ftelseput item 2 of the result into ftend ifanswer "Choose size of font do you want?" with "OK"DoList 999,st,oneif item 2 of the result is empty thenput 24 into stelseput item 2 of the result into stend ifset the textFont of card fld "ha" to ftset the textSize of card fld "ha" to stanswer "Align the field: Left, Right, Center" with¬"Left" or "Right" or "Center"if it is "Left" thenset textAlign of card fld "ha" to leftend ifif it is "Right" thenset textAlign of card fld "ha" to rightend ifif it is "Center" thenset textAlign of card fld "ha" to centerend ifput card fld "funny" into card fld "ha"wait 100answer "Does that look alright" with "Yes" or "No"if it is "no" thentonesend ifend tones</script>
    </part>
    <part>
        <id>233</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>3</left>
            <top>267</top>
            <right>32</right>
            <bottom>280</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>con count</name>
        <script></script>
    </part>
    <part>
        <id>234</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>3</left>
            <top>256</top>
            <right>32</right>
            <bottom>268</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>ans count</name>
        <script></script>
    </part>
    <part>
        <id>242</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>3</left>
            <top>244</top>
            <right>32</right>
            <bottom>257</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>cd count</name>
        <script></script>
    </part>
    <part>
        <id>328</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>156</left>
            <top>120</top>
            <right>356</right>
            <bottom>205</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>card id 7459</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <part>
        <id>334</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>6</left>
            <top>123</top>
            <right>66</right>
            <bottom>136</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <textHeight>12</textHeight>
        <name>label1</name>
        <script></script>
    </part>
    <part>
        <id>335</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>94</left>
            <top>47</top>
            <right>154</right>
            <bottom>60</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <textHeight>12</textHeight>
        <name>label2</name>
        <script></script>
    </part>
    <part>
        <id>336</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>222</left>
            <top>6</top>
            <right>282</right>
            <bottom>19</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <textHeight>12</textHeight>
        <name>label7</name>
        <script></script>
    </part>
    <part>
        <id>337</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>225</left>
            <top>95</top>
            <right>285</right>
            <bottom>108</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <textHeight>12</textHeight>
        <name>label6</name>
        <script></script>
    </part>
    <part>
        <id>338</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>226</left>
            <top>175</top>
            <right>285</right>
            <bottom>188</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <textHeight>12</textHeight>
        <name>label5</name>
        <script></script>
    </part>
    <part>
        <id>339</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>226</left>
            <top>263</top>
            <right>285</right>
            <bottom>275</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <textHeight>12</textHeight>
        <name>label4</name>
        <script></script>
    </part>
    <part>
        <id>341</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>98</left>
            <top>204</top>
            <right>158</right>
            <bottom>217</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <textHeight>12</textHeight>
        <name>label3</name>
        <script></script>
    </part>
    <part>
        <id>351</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>156</left>
            <top>120</top>
            <right>356</right>
            <bottom>205</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>card id 6501</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <part>
        <id>476</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>366</left>
            <top>330</top>
            <right>378</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>deleted</name>
        <script>on mouseUpglobal inum, fldloc, qc, cdname,¬tox, toy, qcc, btn2, btn1, fonttype,¬answertype, sizetype, buttontype, aligntype, anx, anyy, spec1, spec2,¬xx1, yy1put cd fld "funny" into xif x is empty thenanswer "You havent typed a question!" with "OK"exit mouseUpend ifput id of this card into inumset lockscreen to trueset the loc of msg box to 23,208put "WORKING..." into msg boxgo to card cdnamedomenu "new field"set the name of card fld "" to inumput x into card fld inumset the lockText of card fld inum to trueset the style of card fld inum to scrollingset the lockText of card fld inum to trueset the script of card fld inum to "on mouseUp"¬&return&"hide me"&return&"end mouseUp"hide card fld inumdomenu "new button"set the name of card btn "new button" to inumset the rect of card btn inum to 4,122,68,164if fldloc = "begin" thenset the loc of card btn inum to 36,143end ifif fldloc = "yes1" thenset the loc of card btn inum to 124,65end ifif fldloc = "no1" thenset the loc of card btn inum to 128,222end ifif fldloc = "no3" thenset the loc of card btn inum to 255,114end ifif fldloc = "yes3" thenset the loc of card btn inum to 251,25end ifif fldloc = "yes2" thenset the loc of card btn inum to 256,194end ifif fldloc = "no2" thenset the loc of card btn inum to 256,282end ifset the showName of cd btn inum to falseset the style of cd btn inum to transparentset the script of card btn inum to "on mouseUp"¬&return&"show card fld "&quote&inum&quote¬&return&"end mouseUp"domenu "back"if aligntype is empty thenask "What type of alignment do you want?" with "Center"put it into alelseput aligntype into alend ifif fonttype is empty thenask "What type of font do you want?" with "Helvetica"put it into ftelseput fonttype into ftend ifif sizetype is empty thenask "What size font do you want?" with "24"put it into werelseput sizetype into werend ifdomenu "new field"set the name of card fld "" to "ha"set the style of card fld "ha" to scrollingset the rect of card fld "ha" to 6,61,507,200set the textFont of card fld "ha" to ftset the textSize of card fld "ha" to werset the textAlign of card fld "ha" to alhide card fld "funny"put card fld "funny" into card fld "ha"if buttontype is empty thenask "What type of button do you want?" with "shadow"put it into btntypelseput buttontype into btntypend ifchoose button toolput 2 into funrepeat 2 timesdomenu "new button"set the style of card button fun to btntypadd 1 to funend repeatbutscripset the loc of card button 2 to 176,253set the loc of card button 3 to 337,253set lockscreen to falsehide msg boxwait 100answer "Does that look alright" with "No" or "Yes"if it is "No" thentonesend ifchoose browse toolgo to card cdnameput xx1 into card fld spec1put yy1 into card fld spec2hide meend mouseUpon butscripglobal answertype, xx1,yy1,tox,toy,anx,anyy,savedif answertype = "Variable" or answertype is empty thenask "What is answer number 1" with "9 letters max/Yes or No"put it into xx1put the number of characters of xx1 into zipif zip > 9 thenbeep 1repeat until zip ≤ 9beep 1ask "What is answer number 1" with "9 letters max/Yes or No"put it into xx1put the number of characters of xx1 into zipend repeatend ifif anx = "Question" thenset the script of card button "new button" to "on mouseUp"¬&return&"go to card ques"&tox¬&return&"end mouseUp"end ifif anx = "Conclusion" thenset the script of card button "new button" to "on mouseUp"¬&return&"go to card con"&tox¬&return&"end mouseUp"end ifif anx = empty thenset the script of card button "new button" to "on mouseUp"¬&return&"go to card "&tox¬&return&"end mouseUp"end ifset the name of card button "new button" to xx1ask "What is answer number 2" with "9 letters max/Yes or No"put it into yy1put the number of characters of yy1 into zipif zip > 9 thenbeep 1repeat until zip ≤ 9beep 1ask "What is answer number 2" with "9 letters max/Yes or No"put it into yy1put the number of characters of yy1 into zipend repeatend ifif anyy = "Question" thenset the script of card button "new button" to "on mouseUp"¬&return&"go to card ques"&toy¬&return&"end mouseUp"end ifif anyy = "Conclusion" thenset the script of card button "new button" to "on mouseUp"¬&return&"go to card con"&toy¬&return&"end mouseUp"end ifif anyy = empty thenset the script of card button "new button" to "on mouseUp"¬&return&"go to card "&toy¬&return&"end mouseUp"end ifset the name of card button "new button" to yy1end ifif anx = empty thenif answertype = "True-False" thenset the name of card button "new button" to "True"set the script of card button "True" to "on mouseUp"¬&return&"go to card "&tox¬&return&"end mouseUp"put "True" into xx1end ifif answertype = "A-B" thenset the name of card button "new button" to "A"set the script of card button "A" to "on mouseUp"¬&return&"go to card "&tox¬&return&"end mouseUp"put "A" into xx1end ifif answertype = "Yes-No" thenset the name of card button "new button" to "Yes"set the script of card button "Yes" to "on mouseUp"¬&return&"go to card "&tox¬&return&"end mouseUp"put "Yes" into xx1end ifend ifif anyy = empty thenif answertype = "True-False" thenset the name of card button "new button" to "False"set the script of card button "False" to "on mouseUp"¬&return&"go to card "&toy¬&return&"end mouseUp"put "False" into yy1end ifif answertype = "A-B" thenset the name of card button "new button" to "B"set the script of card button "B" to "on mouseUp"¬&return&"go to card "&toy¬&return&"end mouseUp"put "B" into yy1end ifif answertype = "Yes-No" thenset the name of card button "new button" to "No"set the script of card button "No" to "on mouseUp"¬&return&"go to card "&toy¬&return&"end mouseUp"put "No" into yy1end ifend ifif anx = "Question" thenif answertype = "True-False" thenset the name of card button "new button" to "True"set the script of card button "True" to "on mouseUp"¬&return&"go to card ques"&tox¬&return&"end mouseUp"put "True" into xx1end ifif answertype = "A-B" thenset the name of card button "new button" to "A"set the script of card button "A" to "on mouseUp"¬&return&"go to card ques"&tox¬&return&"end mouseUp"put "A" into xx1end ifif answertype = "Yes-No" thenset the name of card button "new button" to "Yes"set the script of card button "Yes" to "on mouseUp"¬&return&"go to card ques"&tox¬&return&"end mouseUp"put "Yes" into xx1end ifend ifif anx = "Conclusion" thenif answertype = "True-False" thenset the name of card button "new button" to "True"set the script of card button "True" to "on mouseUp"¬&return&"go to card con"&tox¬&return&"end mouseUp"put "True" into xx1end ifif answertype = "A-B" thenset the name of card button "new button" to "A"set the script of card button "A" to "on mouseUp"¬&return&"go to card con"&tox¬&return&"end mouseUp"put "A" into xx1end ifif answertype = "Yes-No" thenset the name of card button "new button" to "Yes"set the script of card button "Yes" to "on mouseUp"¬&return&"go to card con"&tox¬&return&"end mouseUp"put "Yes" into xx1end ifend ifif anyy = "Conclusion" thenif answertype = "True-False" thenset the name of card button "new button" to "False"set the script of card button "False" to "on mouseUp"¬&return&"go to card con"&toy¬&return&"end mouseUp"put "False" into yy1end ifif answertype = "A-B" thenset the name of card button "new button" to "B"set the script of card button "B" to "on mouseUp"¬&return&"go to card con"&toy¬&return&"end mouseUp"put "B" into yy1end ifif answertype = "Yes-No" thenset the name of card button "new button" to "No"set the script of card button "No" to "on mouseUp"¬&return&"go to card con"&toy¬&return&"end mouseUp"put "No" into yy1end ifend ifif anyy = "Question" thenif answertype = "True-False" thenset the name of card button "new button" to "False"set the script of card button "False" to "on mouseUp"¬&return&"go to card ques"&toy¬&return&"end mouseUp"put "False" into yy1end ifif answertype = "A-B" thenset the name of card button "new button" to "B"set the script of card button "B" to "on mouseUp"¬&return&"go to card ques"&toy¬&return&"end mouseUp"put "B" into yy1end ifif answertype = "Yes-No" thenset the name of card button "new button" to "No"set the script of card button "No" to "on mouseUp"¬&return&"go to card ques"&toy¬&return&"end mouseUp"put "No" into yy1end ifend ifend butscripon tonesglobal x, aligntype, buttontype, answertype, fonttype, sizetype,¬xx1, yy1put empty into card fld "ha"select card button 2domenu "clear button"select card button 2domenu "clear button"choose select toolput card fld fonttypes of card default into ftput card fld fontsize of card default into stput card fld buttontypes of card default into btanswer "Choose type of font do you want?" with "OK"DoList 999,ft,oneif the result is empty thenput "Geneva" into ftelseput item 2 of the result into ftend ifanswer "Choose size of font do you want?" with "OK"DoList 999,st,oneif item 2 of the result is empty thenput 24 into stelseput item 2 of the result into stend ifset the textFont of card fld "ha" to ftset the textSize of card fld "ha" to stanswer "Align the field: Left, Right, Center" with¬"Left" or "Right" or "Center"if it is "Left" thenset textAlign of card fld "ha" to leftend ifif it is "Right" thenset textAlign of card fld "ha" to rightend ifif it is "Center" thenset textAlign of card fld "ha" to centerend ifanswer "Choose type of button do you want?" with "OK"DoList 999,bt,oneif item 2 of the result is empty thenput "Shadow" into btelseput item 2 of the result into btend ifchoose button toolput 2 into funrepeat 2 timesdomenu "new button"set the style of card button fun to btadd 1 to funend repeatset the loc of card button 2 to 176,253set the loc of card button 3 to 337,253put answertype into savedput variable into answertypebutscripput saved into answertypeput card fld "funny" into card fld "ha"wait 100answer "Does that look alright" with "No" or "Yes"if it is "no" thentonesend ifif xx1 = yy1 thenanswer "You cannot have two buttons with the same names" with "OK"tonesend ifend tones</script>
    </part>
    <part>
        <id>477</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>411</left>
            <top>246</top>
            <right>512</right>
            <bottom>268</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>clear tree</name>
        <script>on mouseUpanswer "This will clear the whole system" with "OK" or "CANCEL"if it is "CANCEL" then exit mouseUpput "WORKING...." into msgset lockscreen to trueput empty into card fld "dqcount"put empty into card fld "dccount"put empty into card fld "ans count"put empty into card fld "con count"put empty into card fld "cd count"put empty into card fld yes1put empty into card fld yes2put empty into card fld yes3put empty into card fld yes4put empty into card fld yes5put empty into card fld yes6put empty into card fld yes7put empty into card fld no1put empty into card fld no2put empty into card fld no3put empty into card fld no4put empty into card fld no5put empty into card fld no6put empty into card fld no7put empty into card fld ques1put empty into card fld ques2put empty into card fld ques3put empty into card fld ques4put empty into card fld ques5put empty into card fld ques6put empty into card fld ques7put empty into card fld label1put empty into card fld label2put empty into card fld label3put empty into card fld label4put empty into card fld label5put empty into card fld label6put empty into card fld label7put empty into card fld no4fldput empty into card fld no5fldput empty into card fld no6fldput empty into card fld no7fldput empty into card fld yes4fldput empty into card fld yes5fldput empty into card fld yes6fldput empty into card fld yes7fldput empty into card fld "problem"choose button toolput 7 into yput the number of card buttons into xsubtract 6 from xrepeat x timesselect card button ydomenu "clear button"end repeatchoose field toolput 53 into yput the number of card fields into xsubtract 52 from xrepeat x timesshow card fld yselect card fld ydomenu "clear field"end repeatrepeat with x = 1 to the number of cardsgo to card ques1put the short name of this card into xif x = "Build" or x = "full" or x = "fulltoo" or x = "default" thengo to next cardelsedomenu "delete card"end ifend repeatchoose browse toolgo to cd buildhide msgset lockscreen to falseend mouseUp</script>
    </part>
    <part>
        <id>541</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>397</left>
            <top>1</top>
            <right>440</right>
            <bottom>13</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>yes7fld</name>
        <script></script>
    </part>
    <part>
        <id>542</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>397</left>
            <top>39</top>
            <right>440</right>
            <bottom>51</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>no7fld</name>
        <script></script>
    </part>
    <part>
        <id>543</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>400</left>
            <top>92</top>
            <right>443</right>
            <bottom>104</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>yes6fld</name>
        <script></script>
    </part>
    <part>
        <id>544</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>402</left>
            <top>123</top>
            <right>445</right>
            <bottom>135</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>no6fld</name>
        <script></script>
    </part>
    <part>
        <id>545</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>403</left>
            <top>172</top>
            <right>457</right>
            <bottom>188</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>yes5fld</name>
        <script></script>
    </part>
    <part>
        <id>546</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>404</left>
            <top>205</top>
            <right>447</right>
            <bottom>217</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>no5fld</name>
        <script></script>
    </part>
    <part>
        <id>547</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>403</left>
            <top>263</top>
            <right>446</right>
            <bottom>275</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>yes4fld</name>
        <script></script>
    </part>
    <part>
        <id>548</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>403</left>
            <top>294</top>
            <right>446</right>
            <bottom>306</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>no4fld</name>
        <script></script>
    </part>
    <part>
        <id>582</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>411</left>
            <top>294</top>
            <right>512</right>
            <bottom>316</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Default</name>
        <script>on mouseUpgo to card defaultshow card button "To tree"hide card button "return"end mouseUp</script>
    </part>
    <part>
        <id>1710</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>402</left>
            <top>89</top>
            <right>510</right>
            <bottom>175</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>problem</name>
        <script></script>
    </part>
    <part>
        <id>1711</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>124</left>
            <top>304</top>
            <right>182</right>
            <bottom>342</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>dccount</name>
        <script></script>
    </part>
    <part>
        <id>1760</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>31</left>
            <top>304</top>
            <right>88</right>
            <bottom>342</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>dqcount</name>
        <script></script>
    </part>
    <part>
        <id>2001</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>411</left>
            <top>270</top>
            <right>512</right>
            <bottom>292</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Edit</name>
        <script>on mouseUpglobal tox, toy, fldloc, qcc, btn1,¬btn2, cdname, answertype, rpl1, rpl2, anx, anyy, rem, pp, spec1, spec2put empty into spec1put empty into spec2put empty into fldlocput empty into anxput empty into anyyput the short name of this card into tempput empty into aput empty into bput empty into cput empty into dput empty into eput empty into fput empty into gput card fld ques1 into aput card fld label1 into a1put card fld ques2 into bput card fld label2 into b1put card fld ques3 into cput card fld label3 into c1put card fld ques4 into dput card fld label4 into d1put card fld ques5 into eput card fld label5 into e1put card fld ques6 into fput card fld label6 into f1put card fld ques7 into gput card fld label7 into g1put empty into a3put empty into b3put empty into c3put empty into d3put empty into e3put empty into f3put empty into g3answer"Edit 1.Question or 2.Conclusion" with "Ques" or "Con" or "Cancel"put it into remif rem is "Cancel" then exit mouseUpif rem is "Ques" thenask "Enter the question number to delete"if it is empty then exit mouseUpput it into painset lockscreen to trueput "WORKING.." into msggo to card "ques"&painput the id of this card into nmdomenu "delete card"go to card tempend ifif rem is "Con" thenask "Enter the conclusion number to delete"if it is empty then exit mouseUphide msgset lockscreen to trueput it into painif a = pain and a1 = "Conclusion" thenadd 10000 to paingo to card "con"&painsubtract 10000 from painput the id of this card into nmdomenu "delete card"go to card tempelseput it into paingo to card "con"&painput the id of this card into nmdomenu "delete card"go to card tempend ifend ifput the short name of this card into cdnameif a = pain and a1 = "Question" and rem = "Ques" thenif cdname ≠ "full" thenput card fld "ques2" into virput card fld "ques3" into vir2if vir is empty and vir2 is empty thenput "butques"&pain into workput "bac"&pain into wkget loc of card button wkget loc of card button wkclick at itselect card button workdomenu "clear button"put the short name of this card into finndomenu "back"domenu "delete card"go to card finnsubtract 1 from card fld "cd count"subtract 1 from card fld "ans count"show card fld "yes6fld"find "ques"&painput the foundField into janeshow janeselect text in janedomenu "Clear Text"choose browse toolhide janeif cd fld dqcount = 0 thenput pain&"," into card fld dqcountelseput ","&pain after last item in card fld dqcountend ifend ifelsesubtract 1 from card fld "ans count"put 100 into a3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes1put empty into card fld no1put empty into card fld ques1put empty into card fld label1put card fld "ques2" into virput card fld "ques3" into vir2if vir is empty and vir2 is empty thengo to card buildchoose browse toolput empty into a3hide msgexit mouseUpend ifend ifend ifchoose browse toolif b = pain and b1 = "Question" and rem = "Ques" thenput 100 into b3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes3put empty into card fld no3put empty into card fld ques2put empty into card fld label2subtract 1 from card fld "ans count"choose browse toolif cd fld dqcount = 0 thenput pain&"," into card fld dqcountelseput ","&pain after last item in card fld dqcountend ifend ifif c = pain and c1 = "Question" and rem = "Ques" thenput 100 into c3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes2put empty into card fld no2put empty into card fld ques3put empty into card fld label3subtract 1 from card fld "ans count"choose browse toolif cd fld dqcount = 0 thenput pain&"," into card fld dqcountelseput ","&pain after last item in card fld dqcountend ifend ifif d = pain and d1 = "Question" and rem = "Ques" thenput 100 into d3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes4put empty into card fld no4put empty into card fld ques4put empty into card fld label4subtract 1 from card fld "ans count"choose browse toolif cd fld dqcount = 0 thenput pain&"," into card fld dqcountelseput ","&pain after last item in card fld dqcountend ifend ifif e = pain and e1 = "Question" and rem = "Ques" thenput 100 into e3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes5put empty into card fld no5put empty into card fld ques5put empty into card fld label5subtract 1 from card fld "ans count"choose browse toolif cd fld dqcount = 0 thenput pain&"," into card fld dqcountelseput ","&pain after last item in card fld dqcountend ifend ifif f = pain and f1 = "Question" and rem = "Ques" thenput 100 into f3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes6put empty into card fld no6put empty into card fld ques6put empty into card fld label6subtract 1 from card fld "ans count"choose browse toolif cd fld dqcount = 0 thenput pain&"," into card fld dqcountelseput ","&pain after last item in card fld dqcountend ifend ifif g = pain and g1 = "Question" and rem = "Ques" thenput 100 into g3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes7put empty into card fld no7put empty into card fld ques7put empty into card fld label7subtract 1 from card fld "ans count"choose browse toolif cd fld dqcount = 0 thenput pain&"," into card fld dqcountelseput ","&pain after last item in card fld dqcountend ifend ifif a = pain and a1 = "Conclusion" and rem = "Con" thenif cdname ≠ "full" thenadd 10000 to painput "butcon"&pain into workput "bac"&pain into wksubtract 10000 from painget loc of card button wkclick at itselect card button workdomenu "clear button"put the short name of this card into finndomenu "back"domenu "delete card"go to card finnsubtract 1 from card fld "cd count"subtract 1 from card fld "con count"add 10000 to painfind "con"&painput the foundField into janeshow janeselect text in janedomenu "Clear Text"choose browse toolhide janesubtract 10000 from painchoose browse toolif cd fld dccount of cd full = 0 thenput pain&"," into card fld dccountelseput ","&pain after last item in card fld dccountend ifelseput 100 into a3select card button button1domenu "clear button"show card fld answer1select card fld answer1domenu "clear field"put empty into card fld yes1put empty into card fld no1put empty into card fld ques1put empty into card fld label1choose browse toolend ifend ifif b = pain and b1 = "Conclusion" and rem = "Con" thenput 100 into b3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes3put empty into card fld no3put empty into card fld ques2put empty into card fld label2subtract 1 from card fld "con count"choose browse toolif cd fld dccount = 0 thenput pain&"," into card fld dccountelseput ","&pain after last item in card fld dccountend ifend ifif c = pain and c1 = "Conclusion" and rem = "Con" thenput 100 into c3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes2put empty into card fld no2put empty into card fld ques3put empty into card fld label3subtract 1 from card fld "con count"choose browse toolif cd fld dccount = 0 thenput pain&"," into card fld dccountelseput ","&pain after last item in card fld dccountend ifend ifif d = pain and d1 = "Conclusion" and rem = "Con" thenput 100 into d3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes4put empty into card fld no4put empty into card fld ques4put empty into card fld label4subtract 1 from card fld "con count"choose browse toolif cd fld dccount = 0 thenput pain&"," into card fld dccountelseput ","&pain after last item in card fld dccountend ifend ifif e = pain and e1 = "Conclusion" and rem = "Con" thenput 100 into e3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes5put empty into card fld no5put empty into card fld ques5put empty into card fld label5subtract 1 from card fld "con count"choose browse toolif cd fld dccount = 0 thenput pain&"," into card fld dccountelseput ","&pain after last item in card fld dccountend ifend ifif f = pain and f1 = "Conclusion" and rem = "Con" thenput 100 into f3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes6put empty into card fld no6put empty into card fld ques6put empty into card fld label6subtract 1 from card fld "con count"choose browse toolif cd fld dccount = 0 thenput pain&"," into card fld dccountelseput ","&pain after last item in card fld dccountend ifend ifif g = pain and g1 = "Conclusion" and rem = "Con" thenput 100 into g3select card button nmdomenu "clear button"show card fld nmselect card fld nmdomenu "clear field"put empty into card fld yes7put empty into card fld no7put empty into card fld ques7put empty into card fld label7subtract 1 from card fld "con count"choose browse toolif cd fld dccount = 0 thenput pain&"," into card fld dccountelseput ","&pain after last item in card fld dccountend ifend ifif a3 = 100 thenput card fld label2 into anxput card fld label3 into anyyput card fld ques2 into xput card fld ques3 into yif x is empty and y is empty thenhide msgexit mouseUpelseadd 1 to card fld "ans count"if rem = "Con" thenput "Conclusion" into card fld label1if the number of items in cd fld dccount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dccountend ifelseput "Question" into card fld label1if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifend ifput x into toxput y into toyput a into qccput a into card fld ques1put "begin" into fldlocanswer "There is a question after this question" with "OK"answer "We must do a replacement question" with "OK"replaceput rpl1 into card fld yes1put "yes1" into spec1put rpl1 into btn1put rpl2 into card fld no1put rpl2 into btn2put "no1" into spec2fillend ifend ifif b3 = 100 thenput card fld label7 into anxput card fld label6 into anyyput card fld ques7 into xput card fld ques6 into yif x is empty and y is empty thenhide msgexit mouseUpelseadd 1 to card fld "ans count"if rem = "Con" thenput "Conclusion" into card fld label2if the number of items in cd fld dccount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dccountend ifelseput "Question" into card fld label2if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifend ifput x into toxput y into toyput b into qccput b into card fld ques2put "yes1" into fldlocanswer "There is a question after this question" with "OK"answer "We must do a replacement question" with "OK"replaceput rpl1 into card fld yes3put "yes3" into spec1put rpl1 into btn1put rpl2 into card fld no3put rpl2 into btn2put "no3" into spec2fillend ifend ifif c3 = 100 thenput card fld label5 into anxput card fld label4 into anyyput card fld ques5 into xput card fld ques4 into yif x is empty and y is empty thenhide msgexit mouseUpelseadd 1 to card fld "ans count"if rem = "Con" thenput "Conclusion" into card fld label3if the number of items in cd fld dqcount = 1 thenput 0 into card fld dccountelsedelete last item of card fld dccountend ifelseput "Question" into card fld label3if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifend ifput x into toxput y into toyput c into qccput c into card fld ques3put "no1" into fldlocanswer "There is a question after this question" with "OK"answer "We must do a replacement question" with "OK"replaceput rpl1 into card fld yes2put "yes2" into spec1put rpl1 into btn1put rpl2 into card fld no2put rpl2 into btn2put "no2" into spec2fillend ifend ifif d3 = 100 thenput card fld yes4fld into xput card fld no4fld into yif x is empty and y is empty thenhide msgexit mouseUpelseadd 1 to card fld "ans count"if rem = "Con" thenput "Conclusion" into card fld label4if the number of items in cd fld dccount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dccountend ifelseput "Question" into card fld label4if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifend ifput x into toxput y into toyput d into qccput d into card fld ques4put "no2" into fldlocanswer "There is a question after this question" with "OK"answer "We must do a replacement question" with "OK"replaceput rpl1 into card fld yes4put "yes4" into spec1put rpl1 into btn1put rpl2 into card fld no4put rpl2 into btn2put "no4" into spec2fillend ifend ifif e3 = 100 thenput card fld yes5fld into xput card fld no5fld into yif x is empty and y is empty thenhide msgexit mouseUpelseadd 1 to card fld "ans count"if rem = "Con" thenput "Conclusion" into card fld label5if the number of items in cd fld dqcount = 1 thenput 0 into card fld dccountelsedelete last item of card fld dccountend ifelseput "Question" into card fld label5if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifend ifput x into toxput y into toyput e into qccput e into card fld ques5put "yes2" into fldlocanswer "There is a question after this question" with "OK"answer "We must do a replacement question" with "OK"replaceput rpl1 into card fld yes5put "yes5" into spec1put rpl1 into btn1put rpl2 into card fld no5put rpl2 into btn2put "no5" into spec2fillend ifend ifif f3 = 100 thenput card fld yes6fld into xput card fld no6fld into yif x is empty and y is empty thenhide msgexit mouseUpelseadd 1 to card fld "ans count"if rem = "Con" thenput "Conclusion" into card fld label6if the number of items in cd fld dccount = 1 thenput 0 into card fld dccountelsedelete last item of card fld dqcountend ifelseput "Question" into card fld label6if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifend ifput x into toxput y into toyput f into qccput f into card fld ques6put "no3" into fldlocanswer "There is a question after this question" with "OK"answer "We must do a replacement question" with "OK"if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifreplaceput rpl1 into card fld yes6put "yes6" into spec1put rpl1 into btn1put rpl2 into card fld no6put rpl2 into btn2put "no6" into spec2fillend ifend ifif g3 = 100 thenput card fld yes7fld into xput card fld no7fld into yif x is empty and y is empty thenhide msgexit mouseUpelseadd 1 to card fld "ans count"if rem = "Con" thenput "Conclusion" into card fld label7if the number of items in cd fld dccount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dccountend ifelseput "Question" into card fld label7if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifend ifput x into toxput y into toyput g into qccput g into card fld ques7put "yes3" into fldlocanswer "There is a question after this question" with "OK"answer "We must do a replacement question" with "OK"if the number of items in cd fld dqcount = 1 thenput 0 into card fld dqcountelsedelete last item of card fld dqcountend ifreplaceput rpl1 into card fld yes7put "yes7" into spec1put rpl1 into btn1put rpl2 into card fld no7put rpl2 into btn2put "no7" into spec2fillend ifend ifset lockscreen to falsehide msgend mouseUpon fillglobal qcc, rem, ppput script of card fld "deleted" into ppgo to last carddomenu "new card"choose text toolset textAlign to leftset textSize to 24set textStyle to bold, underlineclick at 10,44if rem = "Ques" thentype "Question:"set the name of this card to "ques"&qccelsetype "Conclusion"set the name of this card to "con"&qccend ifchoose button tooldomenu "new button"set name of card button "new button" to "finished"set rect of card button "finished" to 229,330,303,342set script of card button "finished" to ppchoose browse tooldomenu "new field"set the name of card fld "" to "funny"set the textAlign of card fld "funny" to centerset the style of card fld funny to scrollingchoose browse toolclick at 246,131end fillon replaceglobal answertype, rpl1, rpl2if answertype = "True-False" thenput "True" into rpl1put "False" into rpl2end ifif answertype = "A-B" thenput "A" into rpl1put "B" into rpl2end ifif answertype = "Yes-No" thenput "Yes" into rpl1put "No" into rpl2end ifend replace</script>
    </part>
    <part>
        <id>2025</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>316</left>
            <top>330</top>
            <right>330</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>expertmenu</name>
        <script>on mouseUpask "Enter the edit id number to delete"if it is empty then exit mouseupput it into xput the number of card flds into totif x > tot thenanswer "There is no id number "&xexit mouseUpend ifanswer "Are you sure you want to delete item "&x with "OK" or "Wait"if it is "Wait" then exit mouseUpput the short name of card fld x into dldelete first word of dldelete first character of dldelete last character of dlput deletefile(dl) into returnthisif returnthis = 0 thenanswer "It is gone"elseif returnthis < 0 thenOsErr returnthiselseanswer "Whoops, there was an error"end ifend ifput the number of cards into yif y > 1 thenput the short name of this card into nmego to last cardput the number of card buttons into cbput card fld cb into savedput the script of card button cb into savedbtnif cb = 1 thendomenu "delete card"elsechoose field toolselect card fld cbdomenu "clear field"choose button toolselect button cbdomenu "clear button"subtract 1 from bg fld hidderend ifgo to card nmeput saved into card fld xset the script of card button x to savedbtnchoose fld toolelseput the number of card buttons into cbchoose field toolselect card fld cbdomenu "clear field"choose button toolselect button cbdomenu "clear button"subtract 1 from bg fld hidderchoose browse toolend ifchoose browse toolif y > 1 thenanswer "It was replaced with the last menu item" with "OK"end ifend mouseUp</script>
    </part>
    <part>
        <id>2035</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>297</left>
            <top>330</top>
            <right>311</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>stackscr</name>
        <script>on openStackgo to first cardput the number of cd buttons into xif x = 0 thenput x into bg fld hidderend ifend openStackon closeStackgo to first cardput the number of cd buttons into xif x = 0 thenput x into bg fld hidderend ifend closeStack</script>
    </part>
    <part>
        <id>2054</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>287</left>
            <top>330</top>
            <right>299</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>deletestack</name>
        <script>on openStackput the long name of this stack into tempgo to card "default"put FontName() into rssput rss into card fld fonttypesgo to card buildanswer "Is this a new or old system" with "New" or "Old"if it is "New" thengo to card "full"put card fld "ques1" into xif x is empty thengo to card buildanswer "Click on Built Expert System to begin." with "OK"show card fld helpelseanswer "There is already a system here" with "OK"end ifend ifif it is "Old" thengo to card "full"put card fld "ques1" into xif x is empty thenanswer "There is no system to work on" with "OK"go to card buildshow card fld helpanswer "Click on Built Expert System to begin." with "OK"end ifend ifend openStackon closeStackdomenu "compact stack"end closeStack</script>
    </part>
    <part>
        <id>2055</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>156</left>
            <top>120</top>
            <right>356</right>
            <bottom>205</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>card id 4043</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <part>
        <id>2059</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>410</left>
            <top>317</top>
            <right>512</right>
            <bottom>339</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Home</name>
        <script>on mouseUpgo homeend mouseUp</script>
    </part>
    <part>
        <id>2120</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>411</left>
            <top>223</top>
            <right>512</right>
            <bottom>245</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Save System</name>
        <script>on mouseUpglobal savedscr, trag, exp, p, scr, pep, filenameanswer "1.Save a copy of tree 2.Finished with system" with "1" or "2" or "Cancel"if it is "Cancel" then exit mouseUpif it is "1" thendomenu "Save a copy..."exit mouseUpend ifanswer "Are you sure your finished?" with "OK" or "Cancel"if it is "Cancel" then exit mouseUpput the script of this stack into savedscr--set the script of this stack to ""put the long name of this stack into pput the long name of this stack into xput the number of characters in x into yput the script of card fld expertmenu into expput the script of card fld stackscr into scrset the loc of msg box to 10,300put "Looking for ExpertMenu Stack" into msg boxset cursor to watchrepeat y timesif character y of x = ":" thenexit repeatelsedelete character y of xend ifsubtract 1 from ynext repeatend repeatdelete first word of xdelete first character of xget Files(x)put it into scopeput the number of words in scope into nmrepeat nm timesif word nm of scope = "ExpertMenu" thenput 1 into tragexit repeatelseput 2 into tragend ifsubtract 1 from nmend repeatput "WORKING" into msgfoundfunif pep = 1 thenset the script of this stack to savedscrexit mouseUpend ifpush cardput card fld "ans count" into yput card fld "con count" into zadd y to zgo to card "ques1"put the number of this card into rttset lockmessages to truehide msganswer "Choose a name for you Expert System" with "OK"answer "Click new when finished" with "OK"domenu "New Stack..."put "WORKING" into msgput the short name of this stack into testitif testit = "HyperExpert 2.4" thenset the script of this stack to savedscrgo to card fullhide msgexit mouseUpend ifput the long name of this stack into zzzset the script of this stack to "on openStack"¬&return&"go to card ques1"¬&return&"end openStack"pop cardput the number of cards into xxsubtract rtt from xxadd 1 to xxrepeat xx timesset lockmessages to truego to card rttdomenu "copy card"go to zzzdomenu "paste card"go padd 1 to rttend repeatgo pput cd fld "problem" of card "full" into pmmgo to stack "ExpertMenu"repeat until bg fld hidder ≠ 5go to next cardend repeatif bg fld "hidder" = 0 thenchoose field tooldomenu "new field"set the style of card fld "" to scrollingset the rect of cd fld "" to 166,120,403,185set the loc of cd fld "" to 284,71put pmm into card fld ""set the lockText of cd fld "" to trueset the name of cd fld "" to zzzchoose button tooldomenu "new button"set the rect of cd button "new button" to 69,277,163,305set the loc of cd button "new button" to 114,53set the style of cd button "new button" to shadowset the autoHilite of cd button "new button" to trueset the script of card button "new button" to "on mouseUp"¬&return&"go to "&zzz¬&return&"end mouseUp"set the name of cd button "new button" to selecthide bg fld hidderend ifif bg fld "hidder" = 1 thenchoose field tooldomenu "new field"set the style of card fld "" to scrollingset the rect of cd fld "" to 166,120,403,185set the loc of cd fld "" to 284,152put pmm into card fld ""set the lockText of cd fld "" to trueset the name of cd fld "" to zzzchoose button tooldomenu "new button"set the rect of cd button "new button" to 69,277,163,305set the loc of cd button "new button" to 114,134set the style of cd button "new button" to shadowset the autoHilite of cd button "new button" to trueset the script of card button "new button" to "on mouseUp"¬&return&"go to "&zzz¬&return&"end mouseUp"set the name of cd button "new button" to selecthide bg fld hidderend ifif bg fld "hidder" = 2 thenchoose field tooldomenu "new field"set the style of card fld "" to scrollingset the rect of cd fld "" to 166,120,403,185set the loc of cd fld "" to 284,231put pmm into card fld ""set the lockText of cd fld "" to trueset the name of cd fld "" to zzzchoose button tooldomenu "new button"set the rect of cd button "new button" to 69,277,163,305set the loc of cd button "new button" to 114,213set the style of cd button "new button" to shadowset the autoHilite of cd button "new button" to trueset the script of card button "new button" to "on mouseUp"¬&return&"go to "&zzz¬&return&"end mouseUp"set the name of cd button "new button" to selecthide bg fld hidderend ifif bg fld "hidder" = 3 thenchoose field tooldomenu "new field"set the style of card fld "" to scrollingset the rect of cd fld "" to 166,120,403,185set the loc of cd fld "" to 284,309put pmm into card fld ""set the lockText of cd fld "" to trueset the name of cd fld "" to zzzchoose button tooldomenu "new button"set the rect of cd button "new button" to 69,277,163,305set the loc of cd button "new button" to 114,291set the style of cd button "new button" to shadowset the autoHilite of cd button "new button" to trueset the script of card button "new button" to "on mouseUp"¬&return&"go to "&zzz¬&return&"end mouseUp"set the name of cd button "new button" to selecthide bg fld hidderend ifif bg fld "hidder" = 4 thenadd 1 to bg fld hidderdomenu "new card"choose field tooldomenu "new field"set the name of cd fld "" to hidderchoose field tooldomenu "new field"set the style of card fld "" to scrollingset the rect of cd fld "" to 166,120,403,185set the loc of cd fld "" to 284,71put pmm into card fld ""set the lockText of cd fld "" to trueset the name of cd fld "" to zzzchoose button tooldomenu "new button"set the rect of cd button "new button" to 69,277,163,305set the loc of cd button "new button" to 114,53set the style of cd button "new button" to shadowset the autoHilite of cd button "new button" to trueset the script of card button "new button" to "on mouseUp"¬&return&"go to "&zzz¬&return&"end mouseUp"set the name of cd button "new button" to selecthide bg fld hidderend ifif bg fld "hidder" is empty thenput 0 into bg fld "hidder"elseadd 1 to bg fld "hidder"end ifgo pgo to card "full"hide msganswer "Are you finished with this system" with "OK" or "CANCEL"if it is "CANCEL" thenchoose browse toolset the script of this stack to savedscrexit mouseUpend ifanswer "This will clean out the tree" with "CANCEL" or "OK"if it is "CANCEL" thenchoose browse toolset the script of this stack to savedscrexit mouseUpend ifput "WORKING" into msgset the script of this stack to savedscrput empty into card fld "ans count"put empty into card fld "con count"put empty into card fld "cd count"put empty into card fld yes1put empty into card fld yes2put empty into card fld yes3put empty into card fld yes4put empty into card fld yes5put empty into card fld yes6put empty into card fld yes7put empty into card fld no1put empty into card fld no2put empty into card fld no3put empty into card fld no4put empty into card fld no5put empty into card fld no6put empty into card fld no7put empty into card fld ques1put empty into card fld ques2put empty into card fld ques3put empty into card fld ques4put empty into card fld ques5put empty into card fld ques6put empty into card fld ques7put empty into card fld label1put empty into card fld label2put empty into card fld label3put empty into card fld label4put empty into card fld label5put empty into card fld label6put empty into card fld label7put empty into card fld no4fldput empty into card fld no5fldput empty into card fld no6fldput empty into card fld no7fldput empty into card fld yes4fldput empty into card fld yes5fldput empty into card fld yes6fldput empty into card fld yes7fldput empty into card fld dqcountput empty into card fld dccountput empty into cd fld problemchoose button toolput 7 into yput the number of card buttons into xsubtract 6 from xrepeat x timesselect card button ydomenu "clear button"end repeatchoose field toolput 53 into yput the number of card fields into xsubtract 52 from xrepeat x timesshow card fld yselect card fld ydomenu "clear field"end repeatrepeat with x = 1 to the number of cardsgo to card ques1put the short name of this card into xif x = "Build" or x = "full" or x = "fulltoo" or x = "default" thengo to next cardelsedomenu "delete card"end ifend repeatchoose browse toolgo to card buildset lockmessages to falsehide msganswer "Click on Build Expert System to start again"end mouseUpon foundfunglobal trag, exp, savedscr, p, scr, fileNamehide msg boxif trag = 2 thenanswer "Cant find stack ExpertMenu, must make new one"set lockmessages to trueput newFileName("Click on the Save button","ExpertMenu") into fileNamenewStack fileNamego stack fileNamedomenu "Convert Stack..."put the short name of this stack into namput the long name of this stack into namerdelete first word of namerdelete first character of namerdelete last character of namerif nam ≠ "ExpertMenu" thenanswer "It must be named ExpertMenu (one word)" with "Silly me"go pput 1 into pepexit foundfunend ifdomenu "Background"choose button tooldomenu "new button"set the rect of bg button "new button" to 444,294,504,331set the loc of bg button "new button" to 474,312set the style of bg btn "new button" to transparentset the autoHilite of bg btn "new button" to trueset the showName of bg btn "new button" to falseset the icon of bg button "new button" to "Lge Next Arrow"set the script of bg btn "new button" to "on mouseUp"¬&return&"go to next card"¬&return&"end mouseUp"set the name of bg button "new button" to "Next"domenu "New Button"set the rect of bg button "New button" to 0,29,46,48set the loc of bg button "New button" to 23,38set the style of bg btn "New button" to shadowset the script of bg btn "New button" to expset the name of bg btn "New button" to "Edit"domenu "New Button"set the rect of bg button "New button" to 0,29,46,48set the loc of bg button "New button" to 21,331set the style of bg btn "New button" to shadowset the script of bg btn "New button" to "on mouseUp"&return&¬"domenu "&quote&"quit hypercard"&quote&return&"end mouseUp"set the name of bg btn "New button" to "Quit"choose text toolset the textAlign to leftset the textFont to Genevaset the textSize to 12set the textStyle to bold, shadow, outlineclick at 10,13type "HyperExpert Menu"click at 412,49set the textStyle to plainset the textSize to 9put 1 into lilput 49 into plcrepeat 4 timesclick at 412,plctype "Edit ID Number: "&liladd 1 to liladd 81 to plcend repeatchoose line toolset the lineSize to 1click at 0,20drag from 0,20 to 511,20set the lineSize to 2drag from 0,23 to 511,23choose field tooldomenu "New Field"set the name of bg fld "" to "hidder"put 0 into bg fld "hidder"hide bg fld hidderdomenu "Background"set the script of this stack to scrgo pput the long name of this stack into thisnamedelete first word of thisnamedelete first character of thisnamedelete last character of thisnameResCopy thisname,namer,XFCN,345elseexit foundfunend ifend foundfun</script>
    </part>
    <part>
        <id>2036</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>0</left>
            <top>0</top>
            <right>512</right>
            <bottom>342</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>help</name>
        <script>on mouseUphide meend mouseUp</script>
    </part>
    <content>
        <layer>card</layer>
        <id>328</id>
        <text>This is six</text>
    </content>
    <content>
        <layer>card</layer>
        <id>2036</id>
        <text>HyperExpert Help - click on field to close it***Load this stack onto your Hard disk or it will run very slow if you don't. Use HyperCard and not SuperCard. I have experienced some problems with this stack  while using SuperCard.****************For those of you who can't wait to get started.************     Step 1 - First click on the button "Build Expert System"     Step 2 - It will ask you to define the problem to be worked on. This is the                     problem that the end users are having. For Example - My car wont                                       start. Common questions or problems which get asked frequently                   is one way to think of it.     Step 3 - Set Defaults. The HyperExpert Stack is designed to make setting                    up your system as quick and easy as possible. The defaults are                    so you can set your cards how you want them to look one time,                    and then you wont have to do it again. Like all Yes-No questions.     Step 4 - After setting defaults you will have to click on the "Build Expert                       System" button again to get started.      Step 5 - Now you start your questioning to come to a conclusion about                     the problem. For example, if your problem is "My car wont start"                            then a good first question would be "Did you check the gas tank".                    You enter it in the proper field and click finished when done.      Step 6 - Now your at the tree portion of the stack. IF YOU CLICK ON THE                     QUESTION 1 BOX YOU CAN SEE THE QUESTION YOU JUST TYPED. You                    can also see the answers you have assigned for Question 1                    (i.e Yes, No). Now click on the answer to the question you                   would like to work with next. For example - your question was                    "Did you check the gas tank" and if they                     answer "No" you want to reach a conclusion at that point.                    So click on the "No" answer box next to the box labeled                     Question 1.      Step 7 - After clicking on the "No" box of Question 1 HyperExpert will ask                    if you want a question or a conclusion. If you choose                     conclusion, HyperExpert will ask you if you want the conclusion                    to go to another question. For example you might have another                     question you might want to ask even though you have reached                     one conclusion already. Simply enter the question number here.      Step 8 - Now type your conclusion, like "You should check your gas tank"                     click finished when done.      Step 9 - Now if your satisfied with all of your questions and conclusions                    click "Save System" and HyperExpert will begin to look for                     the stack "ExpertMenu". If this is the first time you have used                     HyperExpert it will not find the stack and will ask you to make a                     new one. When the new stack window comes up click save and                    dont change the name of the stack. You also need to name your                    question stacks. You may call these whatever you like. These                    are the stacks that the ExpertMenu Stack references.      Step 10 - Your finished. Now give the ExpertMenu stack                     and the question stacks you created to the people who need your                    expertise. This may have sounded like a lot of steps but                    after using this stack once or twice it becomes very intuitive.                    Remember you can make the system as big as the memory and                    disk space of your own Mac will allow.                    You keep the HyperExpert Shell Stack for creating other systems.                        **A word of advise, make sure all of your questions eventually                        end with a conclusion, or your users may end up going down                        a path to no conclusion.                    **Note there is an edit button included on the ExpertMenu Stack.                        This allows anyone to remove the files you have created. You                        may want to remove this button, but it is up to you. It is                         primarily for your use.                                              **Button Functions****Build Expert System**Obviously is the first button you click on to get the process of building your system started.**Clear Tree**This button clears out the tree and the question cards that you have created. It is to be used if you have already saved the system or made some type of error that made it necessary to get rid of the entire system.**Default Settings**This button takes you to the area where you can decide what type of default settings you would like to have for your individual question cards**Edit**This button allows you to edit a question after you have created it. If the question is in the middle of the tree (i.e. there are other questions after it), then a replacement question must be created. If the question is at the end of the tree and there are no other questions after it, then it can be delete without having to replace the question.     There is an edit button on the ExpertMenu stack. It will delete the question stack of your choice. You may decide to remove this button before you give it to your end users. Its up to you.**Set Answer Types**This is a popup menu which gives you a choice of answer types to set as a default. For example -- Yes-No, True-False. After setting this default all of your answer types will be of this kind. Notice there is a Variable answer type for answers which don't fit into one of the given categories.**Set Button Types**This is a popup menu which gives you the standard Hypercard choices for button types.**Set Font Size** This is a popup menu which sets the font size of the field containing your answer or question.**Set Font Types**This is a list menu generated by the Dolist XCMD.  It loads all the fonts you have available in your system and gives you the choice of which font you want to use for the field your question or conclusion is contained. **Set Text Align**This is a popup menu which allows you to choose a type of alignment (left, right, center) for the field which contains your question or conclusion.**Save System**This button saves your questions and conclusions to a separate stack. It will prompt you to name your stack and if you have not created an ExpertMenu stack you will be prompted to do that as well.                                            **Field Information****Deleted Conclusions**This field shows the conclusion numbers you have deleted. HyperExpert re-uses these numbers until the field contains a zero and then it starts numbering from the last conclusion.**Deleted Questions**This field shows the question numbers you have deleted. HyperExpert re-uses these numbers until the field contains a zero and then it starts numbering from the last question.**Name of Problem**Obviously this is the name of the problem you defined in the beginning.**Total Cards**This is the total number of TREE cards. For instance if you fill up the tree card will all seven questions then add an eighth question, you would then be starting another tree card, so at that point you would have 2 tree cards or 2 total cards.**Total Questions**This is the total number of questions not counting conclusions.**Total Conclusions**This is the total number of conclusions not counting questions.</text>
    </content>
    <content>
        <layer>card</layer>
        <id>2055</id>
        <text>did you check the gas</text>
    </content>
    <name>full</name>
    <script>on openCardput the script of this stack into xif x = empty thenput the script of cd fld deletestack into yset the script of this stack to yanswer "Making repairs to stack"answer "It must be re-opened"domenu "Quit Hypercard"end ifhide card fld yes7fldhide card fld yes6fldhide card fld yes5fldhide card fld yes4fldhide card fld no7fldhide card fld no6fldhide card fld no5fldhide card fld no4fldhide card fld deletedhide card fld conclusionhide card fld finishedhide card fld stackscrhide card fld expertmenuhide card fld deletestackend openCard</script>
</card>